use Net::FTP;

$ftp = Net::FTP->new("some.host.name", Debug => 0);
$ftp->login("anonymous",'-anonymous@');
$ftp->cwd("/pub");
$ftp->get("that.file");
$ftp->quit;

##</code><code>##

use LWP::Simple;

getstore 'ftp://ftp.somedomain.com/somefile.txt',
         'somefile.txt';