DB<181> package Test; sub AUTOLOAD { $AUTOLOAD,\@_ }

  DB<182> bar(1,2,3)
Undefined subroutine &main::bar called at (eval 196)[multi_perl5db.pl:644] line 2.

  DB<183> Test::bar(1,2,3)
 => ("Test::bar", [1, 2, 3])

  DB<184> *bar=\&Test::bar
 
  DB<185> bar(1,2,3)
 => ("Test::bar", [1, 2, 3])

##</code><code>##

  DB<186> *foo=*Test::foo
 
  DB<187> foo(1,2,3)
Undefined subroutine &Test::foo called at (eval 206)[multi_perl5db.pl:644] line 2.