perl 脚本里调用 shell 以及获取返回值,如下: #!/usr/bin/perl $output = qx(/home/irdetogame/lucy/CMGC/processAPK.sh); $exitcode = $? >>8; print "output = " . $output; print "exitcode = " . $exitcode;