好的,再读一遍。我需要用 perl 打开一个窗口提示符。这是因为我希望多个提示并行运行 perl 脚本,但又不想手动打开它们。所以我想要一个我可以调用的脚本(主机),告诉要打开的命令提示符的数量(客户端),要运行的客户端脚本的路径,甚至在客户端询问时输入输入。所以,主要有两点:
如何使用 perl 脚本打开提示
如何将输入传递给该提示
谢谢!(PS 我知道运行调用相同主机脚本的主机脚本将是一个巨大的错误,希望我的老板不会那样做:P)
好的,再读一遍。我需要用 perl 打开一个窗口提示符。这是因为我希望多个提示并行运行 perl 脚本,但又不想手动打开它们。所以我想要一个我可以调用的脚本(主机),告诉要打开的命令提示符的数量(客户端),要运行的客户端脚本的路径,甚至在客户端询问时输入输入。所以,主要有两点:
如何使用 perl 脚本打开提示
如何将输入传递给该提示
谢谢!(PS 我知道运行调用相同主机脚本的主机脚本将是一个巨大的错误,希望我的老板不会那样做:P)
可以这么说,这可能不是 Perl 问题,而是 Windows 问题。我怀疑你想要做的是调用“start <options> <script>”。
例如:
my $cmd = "perl -w otherscript.pl";
my $result = system( "start /LOW $cmd" );
这应该在新窗口中启动所需的命令并立即返回。键入start /?
可以更改新脚本的优先级、隐藏下一个窗口或在当前窗口中运行的其他选项。
这是一个 DOS/Windows 问题,而不是 Perl 问题。
采用
system("start cmd.exe /k $cmd")
见start /?
和cmd /?
。