use POSIX;
my $st = 139;
print "WIFEXITED: ", WIFEXITED($st), "\n";
print "WIFSIGNALED: ", WIFSIGNALED($st), "\n";
print "WTERMSIG: ", WTERMSIG($st), "\n";

##</code><code>##

WIFEXITED: 0
WIFSIGNALED: 1
WTERMSIG: 11