Help for this page

Select Code to Download


  1. or download this
    use Net::FTP;
 my ($dropzone,$path,$l,$p,$filename)=@_;
...
 $ftpobj -> put ("$filename") or die "copy failed for $filename...$!\n
+", $ftpobj->message; 

..........
  2. or download this
    Net::FTP>>> Net::FTP(2.77)
Net::FTP>>>   Exporter(5.63)
...
copy failed for Package/1-1112-1356-01_Test_Data_1-1112-1356TX_V_800.t
+mp...
Connection closed; transfer aborted.
Timeout (120 seconds): closing control connection.