perl - 在 perl 中提示输入密码时死掉

Question

我有一个脚本，它使用 ssh key 连接到特定用户的远程服务器。但是，如果用户信息 id 更改且 key 未更新，脚本将挂起等待密码。

如何捕获此问题并在提示输入密码时抛出 DIE？

例如，如果我使用:

system("ssh -C USER@someserver.com -i /.ssh/USER.key ...");

和 USER 与 USER.key 中的 USER 不同，它挂起等待密码。我宁愿它死掉。

在不使用 perl 模块的情况下处理此问题的最佳方法是什么？

Answer 1

试试这个:

system('ssh -o BatchMode=yes -C USER@someserver.com -i /.ssh/USER.key ...');

BatchMode 选项将阻止 ssh 提示输入密码，并且在需要密码时将直接终止。