アウトプットができる技術者に

it's a time to take a new step !

Perl 外部コマンドの実行とその戻り値

外部コマンド(OSコマンド)はバッククオートでくくることで実行でき、
標準出力は「戻り値」、リターンコードは「$?」で取得できる。

open(OUT, "> tmp/a.txt");
    print OUT "1,a";
close OUT;

$exe_val1=`cat tmp/a.txt`;
$ret_code1=$?;
print("executed_value=$exe_val1 \nreturn code=$ret_code1 \n");

$exe_val2=`cat tmp/b.txt`;
$ret_code2=$?;
print("executed_value=$exe_val2 \nreturn code=$ret_code2 \n");