Student Of Perl wrote:
>
> use Net::FTP;
>
> use constant HOST=>'ftp.somexample.com';
> $ftp=Net::FTP->new(HOST) or die "connection error";
> $ftp->login('anonymous') or die $ftp->message;
> $ftp->binary or die $ftp->message;
> $ftp->get("sample.txt") or die $ftp->message;
> $ftp->quit();
>
> I
use Net::FTP;
use constant HOST=>'ftp.somexample.com';
$ftp=Net::FTP->new(HOST) or die "connection error";
$ftp->login('anonymous') or die $ftp->message;
$ftp->binary or die $ftp->message;
$ftp->get("sample.txt") or die $ftp->message;
$ftp->quit();
I have the above script created.The site and f