Help for this page

Select Code to Download


  1. or download this
       my $intr = 0;
   my $save_handler = $SIG{INT};
...
   $SIG{INT} = $save_handler;

   # check value of $intr to see if I was interrupted...
  2. or download this
       my $intr = 0;
   {
...
   } # end of scope for local handler

   # check value of $intr to see if I was interrupted...