Help for this page

Select Code to Download

Select or download this

    bless($self, "Adult");

should be...

    bless($self, "Person::Adult");

Select or download this

my $a = Person::Adult->new(NAME => 'the hard way');
$a->sayHi();