Net::FTP::SimpleSimplified interface to a few common FTP tasks with Net::FTP | |
Download |
Net::FTP::Simple Ranking & Summary
Advertisement
- License:
- Perl Artistic License
- Price:
- FREE
- Publisher Name:
- Wil Cooley
- Publisher web site:
- http://search.cpan.org/~wilco/
Net::FTP::Simple Tags
Net::FTP::Simple Description
Simplified interface to a few common FTP tasks with Net::FTP Net::FTP::Simple is a simplified interface to a few common FTP tasks with Net::FTP.SYNOPSIS use Net::FTP::Simple; my @remote_files = Net::FTP::Simple->list_files({ username => $username, password => $password, server => $server, remote_dir => 'path/to/dir', debug_ftp => 1, file_filter => qr/foo/, }); print "List: ", join(" ", @remote_files), " ") if @remote_files; my @sent_files = Net::FTP::Simple->send_files({ username => $username, password => $password, server => $server, remote_dir => 'path/to/dir', debug_ftp => 1, files => , }); print "The following files were sent successfully: ", join(" ", @sent_files), " " if @sent_files; my @received_files = Net::FTP::Simple->retrieve_files({ username => $username, password => $password, server => $server, remote_dir => 'path/to/dir', debug_ftp => 1, files => , }); print "The following files were retrieved successfully: ", join(" ", @received_files), " " if @received_files; my @received_filtered_files = Net::FTP::Simple->retrieve_files({ username => $username, password => $password, server => $server, remote_dir => 'path/to/dir', debug_ftp => 1, file_filter => qr/^ba..txt/, delete_after => 1, }); print "The following files were retrieved successfully: ", join(" ", @received_filtered_files), " " if @received_filtered_files; my @renamed_files = Net::FTP::Simple->rename_files({ username => $username, password => $password, server => $server, remote_dir => 'path/to/dir', debug_ftp => 1, rename_files => { 'old_name' => 'new_name', }, }); Requirements: · Perl
Net::FTP::Simple Related Software