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);