in reply to Re^2: Using import to generate subroutines
in thread Using import to generate subroutines
An AUTOLOAD for dbms_random_random has no (easy) way to figure out if it is supposed to call dbms_random.random or dbms.random_random.
Well actually you have the same problem if you are exporting functions with the added disadvantage of tons of redundant code.
sub AUTOLOAD { my ( undef, $funcname ) = split '::', $AUTOLOAD; my $mapping = { foo => 'foo.bar', bar => 'foobar', }; if ( exists $mapping->{$funcname} ) { # exec $mapping->{$funcname} } else { die "Can't do $funcname, NFI how to!\n"; } }
cheers
tachyon
|
---|
Replies are listed 'Best First'. | |
---|---|
Re^4: Using import to generate subroutines
by Thilosophy (Curate) on Nov 24, 2004 at 05:26 UTC |
In Section
Seekers of Perl Wisdom