Perl 脚本中交互式命令的相同输入

Question

在 Perl 脚本中，我使用系统的单元命令（外部命令） 但是该命令需要用户的一些运行时输入。每次我想提供存储在变量中的类似输入。

我的命令是：

system("dt ci $dest_file");

执行此命令后，我的脚本正在等待用户输入， 假设我想每次都给“re base”作为输入

如何在每次询问时提供修复输入？

请帮忙，我正在使用 Windows 7。

我想让脚本完全自动化...它不应该等待用户输入

Answer 1

如果你这样调用你的脚本：

perl test.pl < input.txt 

它应该将文件的内容作为输入。 （这是使用 STDIN 读取）