04 2012 档案
perl shell交换示例
摘要:a.sh 1 #/bin/sh 2 echo "haha"; 3 exit 1;perl脚本22 my $output=qx(sh a.sh);23 my $exitcode=$?;24 $exitcode>>=8;25 print "output=$output\n";26 print "exitcode=$exitcode\n";27 system("pwd");28 print STDERR "$0 has finished,congratulations!\n";29 pri
阅读全文
浙公网安备 33010602011771号