Select Code to Download

use strict;
use warnings;
...
bar(4);                                  # fails

[["is foo"], 0] at d:/exp/t_Method_Load.pl line 77.
    Delegate::Foo::foo(Delegate::Foo=HASH(0x2dbc388), 0) called at d:/
+exp/t_Method_Load.pl line 100
...
    Delegate::Foo::foo(Delegate::Foo=HASH(0x2dbc388), 3) called at d:/
+exp/t_Method_Load.pl line 42
    Method::Load::autoload(3) called at d:/exp/t_Method_Load.pl line 1
+12
Can't locate object method "bar" via package "Delegate::Foo" at d:/exp
+/t_Method_Load.pl line 42.