如何在perl脚本

Question

当我在linux终端中给出以下命令时，它成功了：

sshpass -p "PASS" ssh user@IP_OF_REMOTE_HOST touch /path/to/file/FILE;

然后我试图通过perl脚本给它如下，但不起作用：

• 第一次尝试 - 反击“

  `sshpass -p "PASS" ssh user@IP_OF_REMOTE_HOST touch /path/to/file/FILE;`;
  

• 第二次尝试 - 反击'并将\放在@

  前面

  `sshpass -p "PASS" ssh user\@IP_OF_REMOTE_HOST touch /path/to/file/FILE;`;
  

• 第3次尝试 - 使用系统

  `system("sshpass -p 'PASS' ssh user@IP_OF_REMOTE_HOST touch /path/to/file/FILE");`
  

• 第四种方式 - 反叛但不使用sshpass

  `sudo su -u user ssh user@IP_OF_REMOTE_HOST "touch /path/to/file/FILE";`
  

还有一些但没有效果。

有什么想法吗？

Thnx提前