or download this
$ strace -fe execve perl -e '$code=system("exit 3"); print("Finished w
+ith $? (or ",$?>>8,") $code (or ",$code>>8,")\n");'
execve("/usr/bin/perl", ["perl", "-e", "$code=system(\"exit 3\"); prin
+t(\"F"...], [/* 51 vars */]) = 0
strace: Process 24553 attached
...
--- SIGCHLD {si_signo=SIGCHLD, si_code=CLD_EXITED, si_pid=24553, si_ui
+d=1000, si_status=255, si_utime=0, si_stime=0} ---
Finished with -1 (or 72057594037927935) -1 (or 72057594037927935)
+++ exited with 0 +++
or download this
$ strace -fe execve perl -e '$code=system("ps > /dev/null;exit 3"); pr
+int("Finished with $? (or ",$?>>8,") $code (or ",$code>>8,")\n");'
execve("/usr/bin/perl", ["perl", "-e", "$code=system(\"ps > /dev/null;
+exi"...], [/* 51 vars */]) = 0
strace: Process 24618 attached
...
--- SIGCHLD {si_signo=SIGCHLD, si_code=CLD_EXITED, si_pid=24618, si_ui
+d=1000, si_status=3, si_utime=0, si_stime=0} ---
Finished with 768 (or 3) 768 (or 3)
+++ exited with 0 +++