$SIG{INT} = \&got_int;

##</code><code>##

  local $SIG{QUIT} = sub { GotSignal('quit') };