結果 : perl execute shell command and get return code