如何使用perl输入Enter？

Question

我有一个需要调整的Perl脚本。

该脚本运行并要求我手动输入一个IP地址，但是当它要求我输入该IP地址时，我想在该IP地址中进行硬编码，因此我需要告诉该脚本键入IP，然后按Enter键以继续输入脚本。

有人可以告诉我该怎么做吗？ 我确定这可能是非常基础的东西，但是我不是脚本编写者，所以我不确定如何执行此操作。

我需要输入IP并按Enter键的脚本如下：

print "\nPlease enter the IP address of the node:";
chomp($nodeIP= <STDIN>);

提前致谢。

Answer 1

最简单的是更换

print "\nPlease enter the IP address of the node:";
chomp($nodeIP= <STDIN>);

只是

$nodeIp="192.168.2.1";

好吧，当然使用您的地址，而不是我的路由器的地址。

开始写自己的stdin或模拟击键很麻烦。

您不需要chomp（）方法，因为该方法仅用于从行尾删除Enter。

Answer 2

您是否正在尝试使一个脚本与另一个脚本自动化？ 如果是这样的话，你可能会更好使用一种称为工具expect （ 期望：一种自动化交互工具 。我已经使用了一些奇怪的安装脚本。

如果您要修改的是Perl脚本以等待用户提示，那么我将替换为：

print "\nPlease enter the IP address of the node:";
chomp($nodeIP= <STDIN>);

同

$nodeIP = "1.2.3.4";
print "\nThe IP is $nodeIP.  If this is correct press ENTER to continue.\n";
<STDIN>

如果等待ENTER键，则只需阅读STDIN并扔掉即可。