Help for this page
$obj->doSomething();
$myFunkyLogMachine->Log("hi!"); $obj->doSomething(); $myFunkyLogMachine->Log("bye!");
*obj::doSomething2 = \&obj::doSomething; *obj::doSomething = sub { $myFunkyLogMachine->Log("hi!"); $obj->doSome +thing2(@_); $myFunkyLogMachine->Log("bye!"); }