http://qs1969.pair.com?node_id=222823


in reply to Net::FTP

One FAQ I get a lot is how to make Net::FTP do mget/mput. I suggest the following:
foreach my $file (@files) { # Or get... $ftp->put($file) or die "Error putting $file: ", $ftp->message; }

Replies are listed 'Best First'.
Re: Re: Net::FTP
by pinetree (Scribe) on Dec 29, 2002 at 04:30 UTC
    Or, if you want to attempt to put/get all of your files - store the errors in a scalar or array and die/log them after looping through @files:
    my @errors = (); foreach my $file (@files) { # Or get... $ftp->put($file) or push (@errors, ("Error putting $file: " . $ftp +->message)); } die (join "\n", @errors);
      How do you define @files?