note
pc88mxer
This is in the <c>libnet</c> FAQ: [http://search.cpan.org/~jhi/perl-5.8.1/lib/Net/libnetFAQ.pod#Why_does_Net::FTP_not_implement_mput_and_mget_methods|(link)]:
<p><i>Why does Net::FTP not implement mput and mget methods</i>
<p>
The quick answer is because they are easy to implement yourself. The long answer is that to write these in such a way that multiple platforms are supported correctly would just require too much code. Below are some examples how you can implement these yourself.
<c>
sub mput { my($ftp,$pattern) = @_; foreach my $file (glob($pattern)) { $ftp->put($file) or warn $ftp->message; } }
sub mget { my($ftp,$pattern) = @_; foreach my $file ($ftp->ls($pattern)) { $ftp->get($file) or warn $ftp->message; } }
</c>
700654
700654