More about Perl OO