perl网络编程学习系列:Net:FTP

对于提高编程语言的水平,熟练使用各种开发库是必经之路

网络编程中涉及很多,自己写个小例子供学习使用

use Net::FTP;

use constant HOST=> '192.168.128.3';
use constant DIR=>'/home/corersky/study/perl';
use constant FILE=>'test.txt';

my $ftp=Net::FTP->new(HOST) or die "Could not connet:$@/n";
$ftp->login('test','test')  or die $ftp->message;
$ftp->cwd(DIR)              or die $ftp->message;
$ftp->get(FILE)              or die $ftp->message;
$ftp->quit;
warn "ftp file ok!/n"; 

要深入学习还要多光顾http://search.cpan.org/,呵呵