use Net::FTP;

$ftp = Net::FTP->new("some.host.name", Debug => 1)
  or die "Cannot connect to some.host.name: $@";
   
$ftp->login("your_name",'password')
  or die "Cannot login ", $ftp->message;

$ftp->cwd("remote_dir") #cwd at remote site may not
                        #be necessary depending upon your logon.
  or die "Cannot change working directory ", $ftp->message;

$ftp->get("somefilename")
  or die "get failed ", $ftp->message;