将 stdin 输入传递给 perl 脚本以进行远程执行

Question

我有一个 Perl 脚本，它使用 openssh 访问远程机器并在该远程机器上执行 Perl 脚本。

现在的问题是需要在远程机器上执行的脚本是一个交互式脚本，并且在执行过程中需要通过 STDIN 进行一些输入。

有人可以帮我实现这个场景吗？

我正在放置到目前为止我已经实现的代码的sn-p。

my $ssh = Net::OpenSSH->new("$host", timeout => 60) or die "unable to connect to remote host: ". $ssh->error;
$ssh->system("chmod 755 abc.pl"); 
my $output=$ssh->capture("./abc.pl") or die "remote command failed: "  . $ssh->error;

Answer 1

如果您自动完成执行，那么您将无法请求用户输入。您必须手动运行脚本，否则您必须修改远程服务器上的脚本以接受来自远程执行的变量。