What's wrong with the Net::FTP module? It's extremely easy to use, even LWP uses Net::FTP. I have written a small example using the Net::FTP module to do the samething. Net::FTP isn't exactly rocket science and should be easily mastered. ;-)

#!/usr/bin/perl -w
use strict;
use Net::FTP;

my $ftp = Net::FTP->new("ftp.someserver.com")
  or die "Cannot connect to ftp.someserver.com: $@";

$ftp->login("anonymous",'anon')
  or die "Cannot login ", $ftp->message;

$ftp->cwd("/pub")
  or die "Cannot change working directory ", $ftp->message;

$ftp->put("100mb.file")
  or die "put failed ", $ftp->message;

$ftp->quit;
[download]