The problem arises because Perl's inheritance is based upon blessed hashes, but Net::FTP uses blessed GLOB's ( courtesy of IO::Socket::INET).

One way around this would be to use an AUTOLOAD sub to extract the Net::FTP glob from your hash and re-dispatch the missing method via that. Something like (untested):

sub AUTOLOAD {
    my $self = shift;
    my $super = $self->{parent};
    ( my $method = $AUTOLOAD ) =~ s[.*::][];
    return $super->$method( @_ );
}
[download]