Help for this page

Select Code to Download


  1. or download this
    my $PACKAGE = caller(0);
  2. or download this
    package Private;

...

1;
  3. or download this
    
{
...

print "\nDerived class: call method that calls parent's public method:
+\n";
eval { Child->child_calling_public; }; $@ and print $@;