$ftp->put($input_file, $new_file_name) || die $ftp->message(), "\n";