use warnings; use strict; my $s;
$s = system q(cat),  qw(nosuchfile);       printf q(ret=0x%04x, err=>>%s<<%s), $s, $!, $/; $!=0;
$s = system q(xcat), qw(nosuchfile);       printf q(ret=0x%04x, err=>>%s<<%s), $s, $!, $/; $!=0;
$s = system q(perl), q(-le), q(exit 0x13); printf q(ret=0x%04x, err=>>%s<<%s), $s, $!, $/; $!=0;
$s = system q(perl), q(-le), q(exit 0xFF); printf q(ret=0x%04x, err=>>%s<<%s), $s, $!, $/; $!=0;