Help for this page

Select Code to Download


  1. or download this
    $SIG{ALRM} = \&timed_out;
eval {
...
sub timed_out {
    die "GOT TIRED OF WAITING";
}
  2. or download this
    C:\>perl -e "print join ' ', keys %SIG"
STOP NUM05 NUM06 ALRM NUM07 NUM24 NUM16 NUM17 NUM18 NUM19 ILL CHLD SEG
+V PIPE CLD
 ABRT CONT INT QUIT KILL BREAK TERM NUM01 FPE NUM10 NUM12