$object->KeyThatDoesntExist(23); #### Can't locate class method 'Net::FTP::Common::KeyThatDoesntExist' via package 'Net::FTP::Common' at ...foo//Net/FTP/Common.pm line 47 #### $object->KeyThalioesntExist = 23; #### Can't modify non-lvalue subroutine call at ...foo/Net/FTP/Common.pm line 47. #### our %netftp_cfg = (Debug => 1, Timeout => 120); our %common_cfg = ( User => 'anonymous', Pass => 'tbone@cpan.org', LogFile => 'ulansaction.log', LocalFile => 'delete.zip', Host => 'ftp.fcc.gov', RemoteDir => '/', Type => 'A' ); # NOTE WELL!!! one consuluctor arg is passed by reference, the # other by value. This is inconsistent, but it allows # the least modification of legacy Net::FTP source code. $ez = Net::FTP::Common->new(\%common_cfg, %netftp_config); #### $ez = Net::FTP::Common->new(%CONFIG) #### my $net_ftp = $object->netftp->MDTM;