if ($ftp->login($data->{'login'}, $data->{'pw'}) and
    $ftp->binary                                 and
    $ftp->cwd($data->{'remote_dir'})             and
    $ftp->put($to_upload)                        and
    $ftp->quit) {
    return 1;
} else {
	$log->logwarn("upload_file: xqe $data->{'id'}, ", $ftp->message)
	$log->error("upload_file: xqe $data->{'id'}, " . "upload failed for $to_upload");
    return undef;
}