如何用Perl打开命令提示符？

Question

好的,再读一遍.我需要打开一个带有perl的Windows提示符.这是因为我想要并行运行perl脚本的多个提示,但不想手动打开它们.所以我想要一个我可以调用的脚本(主机),告诉打开(客户端)命令提示的数量,运行客户端脚本的路径,甚至在客户端询问时输入输入.那么,有两件大事:

1. 如何使用perl脚本打开提示符

2. 如何将输入传递给该提示

谢谢!(PS我知道运行调用相同主机脚本的主机脚本将是一个巨大的错误,希望我的老板不这样做:P)

Answer 1

这可能不是一个Perl问题,可以说是一个Windows问题.我怀疑你想要做的是调用"start <options> <script>".

例如:

my $cmd = "perl -w otherscript.pl";
my $result = system( "start /LOW $cmd" );

这应该在新窗口中启动所需的命令并立即返回.键入start /?可以更改新脚本优先级的其他选项,隐藏下一个窗口或在当前窗口中运行.

Answer 2

这是一个DOS/Windows问题,而不是Perl问题.

使用

system("start cmd.exe /k $cmd")

见start /?和cmd /?.