...
print "exit code: $exitcode, message: '$msg'\n";
exit $exitcode;

##</code><code>##

$ perl -e "exit -1"
$ echo $?
255