Select Code to Download

use Carp qw/croak/;
BEGIN {
...
        &$logger( @_ );
    }
}

Test::foo();
Devel::TraceMethods::callback( sub { print STDERR "called $_[0].\n" } 
+);
...
called bar.
called AUTOLOAD.
Can works!