Select Code to Download

package Foo;
sub new { bless {}, shift }
...
Foo->new->foo;  # "Instance method called on Foo=HASH(0x...)"
Bar->foo;       # "Class method called on class Bar"
Bar->new->foo;  # "Instance method called on Bar=HASH(0x...)"