使用 perl 调用 coreftp 应用程序答案

【问题标题】：Calling coreftp application with perl使用 perl 调用 coreftp 应用程序
【发布时间】：2015-11-18 20:03:38
【问题描述】：

我正在尝试遍历一组文件并使用coreftp 上传到 FTP 站点。我需要使用核心 ftp，不能使用Net::SFTP 或任何其他模块。

当我在 CMD 提示符下运行此命令时，它运行良好，但正如您所见，它仅适用于一个文件：

'"c:\program files\coreftp\coreftp.exe" -s -O -site My_Upload_Site -u //someserver/atextfile.txt -p /directory/'

我请求帮助，将foreach 循环变量与命令提示符结合起来。如何调用 CMD 脚本并将 foreach 循环中的 "//someserver/atextfile.txt" 替换为 $TheInputDir/$FileToUse？

 foreach $FileToUse(@FilesToUse)  
    {
'"c:\program files\coreftp\coreftp.exe" -s -O -site My_Upload_Site -u //someserver/atextfile.txt -p /directory/'

#once uploaded move the file
    move ("$TheInputDir/$FileToUse", "$TheMoveDir/$FileToUse") or $MailMsg = $MailMsg . "ERROR: Moving files Failed! \n";

    }

如果有更好的方法，我总是乐于接受建议。

【问题讨论】：

标签： perl

【解决方案1】：

我在 PUTTY 上取得了很大的成功，特别是 PSCP。您可以在命令行上运行PSCP 来测试它并确保您正确调用它。然后，在您的脚本中，使用system() 或反引号或您想要的任何方式调用它。使用 SCP 还是 SFTP 更好是一个争论的问题，我在这里不偏袒任何一方。就我而言，PSCP 工作得很好。

不幸的是，我目前无法访问远程服务器，或者我会编写一个脚本来说明它。尽管如此，它还是易于使用且可靠。

下载：http://www.chiark.greenend.org.uk/~sgtatham/putty/download.html

使用示例：pscp fred@example.com:/etc/hosts c:\temp\example-hosts.txt

【讨论】：