Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl

...
$obj->foo1();          # indirect, using goto (transparent)
$obj->foo2();          # indirect, using goto via closure
$obj->foo3();          # indirect, using regular call via $self
  2. or download this
    foo at ./722627.pl line 16
        Foo::myFunction('Foo=HASH(0x63c430)') called at ./722627.pl li
+ne 40
...
foo at ./722627.pl line 16
        Foo::myFunction('Foo=HASH(0x63c430)') called at ./722627.pl li
+ne 33
        Foo::foo3('Foo=HASH(0x63c430)') called at ./722627.pl line 43