为什么 IPC::Open3 调用 cmd.exe 而不是请求的程序？

Question

我在 Windows 7 上的 Perl 5.16.3 x64（用 VC10 编译）上运行它。

当我运行这样的事情时：

use strict;
use warnings;
use IPC::Open3;
use Symbol 'gensym';

my $command = q[perl -e "$| = 1; for (1..60) { print '.'; sleep 1 }"];

my ($in, $out, $err);
$out = gensym;
$err = gensym;

my $pid = open3($in, $out, $err, $command);

在进程列表中可以看到IPC::Open3调用的实际命令是：

cmd.exe /x/d/c perl -e "$| = 1; for (1..60) { print '.'; sleep 1 }"

这当然会创建一个带有实际调用的子进程：

perl -e "$| = 1; for (1..60) { print '.'; sleep 1 }"

因此，我得到了对应于 cmd.exe 的 pid，而不是对应于 perl.exe 的。

该文档没有提及有关此调用顺序的任何内容或有关 Windows 上不同行为的任何内容。我这里没有 Linux/Unix 机器来测试它，但我敢打赌它不会在那里做类似的事情（如果有人可以测试，如果我错了，请告诉我）。

无论如何，我想知道为什么IPC::Open3 会这样做？为什么不在那个命令里直接调用perl呢？

提前感谢任何 cmets。

Answer 1

要执行一个shell命令，你需要一个shell。

与system 一样，open3 具有以下调用约定：

open3(..., ..., ..., $SHELL_COMMAND)
open3(..., ..., ..., $PROG, @ONE_OR_MORE_ARGS)

以下内容不应调用 shell：

my @command = ('perl', '-e', '$| = 1; for (1..60) { print q{.}; sleep 1 }');
my $pid = open3($in, $out, $err, @command);