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";

この Perl コードを eval ブロッ​​クで呼び出しています。呼び出されると、ステータスが 0 として出力されますが、バッチ ファイルは実際には実行されていません。この理由は何でしょうか？上記の「システム」呼び出しに問題はありますか?

ありがとう、ジッツ

Answer 1

バットファイルが実行されていないことを確認してください。私はあなたのコードを取得し、私のマシンに存在しないパスを修正しました。バッチファイルを呼び出すようにします

echo In myrun  1=%1  2=%2

そして、出力ファイルに以下を書き込みます

 In myrun  1="\\Server\share\folder1"  2="D:\output\folder1"

Answer 2

あなたが使用できる

 system ("start C:\\project\\set_env_and_run.bat");

Answer 3

二重引用符内のバックスラッシュをエスケープする必要があります。

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