windows - 从 Perl 运行批处理文件(Windows 中的 Activestate perl)

Question

我有一个 Perl 程序，它执行如下操作:

#!/usr/bin/env perl    
use strict;
use warnings;

my $exe = "C:\\project\\set_env_and_run.bat";

my $arg1 = "\\\\Server\\share\\folder1";    
my $arg2 = "D:\\output\\folder1";

my $cmd = "$exe \"$arg1\" \"$arg2\"";    
my $status = system("$cmd > c:\\tmp\\out.txt 2>&1");

print "$status\n";

我在 eval block 中调用此 Perl 代码。调用时，我将状态打印为 0，但批处理文件尚未实际执行。这是什么原因？上面编码的“系统”调用有什么问题吗？

谢谢，抖动

Answer 1

您需要在双引号内转义反斜杠。

my $exe = "C:\\project\\set_env_and_run.bat";
...
my $status = system("$cmd > c:\\tmp\\out.txt 2>&1");