如何为 Perl 打开 Windows CMD 窗口并运行命令？答案

【问题标题】：How can I open a Windows CMD window for Perl and run a command?如何为 Perl 打开 Windows CMD 窗口并运行命令？
【发布时间】：2010-09-22 10:13:58
【问题描述】：

有没有一种方法可以打开一个新的 cmd 窗口并传递一个变量，然后在完成后关闭该窗口？

我找到了一些信息，但还不足以让它工作。

system('start "List Perl files" dir c:/dfd/dfdf.pl /B');

打开窗口但不运行脚本。

【问题讨论】：

【解决方案1】：

主脚本：

my ($x, $y) = (888, 999);
system('start', 'List Perl files', 'perl', 'other_script.pl', $x, $y);

另一个脚本：

print "Args received = @ARGV\n";
<STDIN>;

顺便说一句，可能有更好的方法来实现您的更大目标——例如，将所需的功能组织到模块中。通过命令行参数和@ARGV 将信息从一个脚本传递到另一个脚本可能是一件麻烦事，也是一个限制因素。

【讨论】：

如何检索变量数组...foreach( @ARGV ) { print @_ . "\n"; } <STDIN>; ??
单参数system 中的引号可能有问题。最好使用system("start", "List Perl files", "perl", "other_script.pl", $x, $y);。
@Phil 请参阅手册中的 perl 数组循环示例 - perldoc.perl.org/perlsyn.html#Foreach-Loops