$SIG{ALRM} = sub {
  die 'Unexpected alarm signal';
};