$ftp->put ( $input_file, $new_file_name ) or die "did not upload $input_file to $new_file_name: " . $ftp->message;