Help for this page

Select Code to Download


  1. or download this
    U:\>perl -e "package bar; sub mankato {print __PACKAGE__}; package foo
+; *mankato
 = \&bar::mankato; mankato();"
bar
  2. or download this
    U:\>perl -we "package bar; sub new {return(bless({}))}; sub mankato{pr
+int __PACKAGE__}; package foo; push @ISA, qw|bar|; package main; my $
+o = foo->new(); $o->mankato();"
bar