The perl core has a way of detecting non-zero exit statuses:

    $ perl -Mautodie=system -e 'system("/bin/false")'
    "/bin/false" unexpectedly returned exit value 1 at (eval 5) line 13
     at -e line 1

Pretty nice.