如何使perl执行第三方命令

Question

我在perl中执行任务时遇到了问题。通过这个脚本，首先我想进入另一个路径，然后执行位于该路径中的命令。

例如:<drive>Program Files<software>bin这里的命令是，xyz -c

那么，该怎么做呢?我所做的是——>

my $command = '<drive>Program Files<software>bin';
$sts = `("$command\xyz -c")`;
print $sts;

但是不能写

Not an internal or external command.

当我手动进入这个特定的驱动器cmd，并执行命令，它工作…

问候,维克

Answer 1

Replace

$sts = `("$command\xyz -c")`;

$sts = `"$command\xyz -c"`;

，再试一次。

要确保使用的是有效的文件路径，可以将上面的代码替换为

if (-f "$command\xyz") {
    $sts = `"$command\xyz -c"`;
    print $sts;
}