Select Code to Download

$ftp->put ($fname, $remote_directory) or die
    "OOPS! Can't send localfiles: $!\n";

$ftp->cd ($remote_directory) or die "Cannot change to $remote_director
+y. $@";
$ftp->put ($fname) or die "OOPS! Can't send localfiles: $@";