# assumes connection is first arg sub AUTOLOAD { (my $name = $AUTOLOAD) =~ s/.*:://; eval "sub $AUTOLOAD { shift()->rpc( '$name', \@_) }"; goto &$AUTOLOAD; }