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