in reply to Re^3: SVN::Client subclassing issue
in thread SVN::Client subclassing issue
See AUTOLOAD section of Modern Perl: the free book, and mind the caveats
Assuming hashref has-a 'SVN::Client'
sub AUTOLOAD { my ($name) = our $AUTOLOAD =~ /::(\w+)$/; my $method = sub { my $self = shift; return $self->{'SVN::Client'}->$name( @_ ); } no strict 'refs'; *{ $AUTOLOAD } = $method; return $method->( @_ ); }
|
---|
In Section
Seekers of Perl Wisdom