$ftp->put($somefile, $some_other_file) || die $ftp->message(), "\n";