Nice. I wrote an "oops" hack to get around this:

use Carp;
use vars '$AUTOLOAD';  # in case strict is on

AUTOLOAD {
  my ($pkg, $func) = $AUTOLOAD =~ /(.*)::(.*)/;
  my $cref = $pkg->can($func) or
    carp "no such method $func in $pkg";
  unshift @_, $pkg;
  goto &$cref;
}
[download]

This turns a Foo::BarMod::whiz into a Foo::BarMod->whiz -- specifically, it turns it into Wherever::whiz(Foo::BarMod, ...).

japhy -- Perl and Regex Hacker