Perl Term :: ReadLine stdin问题

Question

所以我有一个Term :: Readline循环，它通过ssh执行代码但是代码使用哪个使得Term :: Readline不满意。

如何从读取STDIN暂停Term :: Readline并允许STDIN在我的外部脚本上正常工作？

一些示例代码：

ssh root@server "perl <<'EOF'
use strict;
chomp(my $answer = <STDIN>);
print $answer;
EOF

请注意，这个ssh是从Term :: ReadLine循环中调用的。