需要按任意键终止批处理文件

Question

我必须使用perl运行批处理文件。批处理开始并以“按任意键继续......”结束。我想模拟按键并获得输出。

在此代码中，sendkey不起作用，perl命令提示符仍然等待，直到我手动按任意键。

#!/usr/bin/perl
use strict;
use warnings;
use Win32::GuiTest qw(:ALL);

my @args = ('C:\Upgrade.bat');
system(@args);
sendkey("{ENT}");`