$SIG{"ALRM"} = sub { next; };
  alarm($timeout);