my ($sig, $ret) = ($?&255, $?>>8); die "child died from signal $sig" if $sig; die "child exited with code $ret" if $ret;
In reply to Re: shell within perl
by jaco
in thread shell within perl
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |