Help for this page

Select Code to Download


  1. or download this
    $SIG{ALRM} = sub {die 'timeout'};
while ( $number < 10 ) {
...
   } 

}