in reply to Re^3: SVN::Client subclassing issue
in thread SVN::Client subclassing issue
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->( @_ ); }
|
|---|