in reply to How to return the exit status thru perl script execution?
... if($success){$status_code = 0} else{$status_code = 1} exit($status_code) [download]