- or download this
# Bozo.pm
package Bozo;
...
sub go_bozo { return "bozo!" }
1;
- or download this
# Foo.pm
package Foo;
...
sub proxy { return go_bozo() }
1;
- or download this
# prog.pl
use strict;
...
print go_bozo();
print Foo::proxy(); # or Foo->proxy() if you want 'Foo' sent as the f
+irst arg...