Select Code to Download

use strict; use warnings ;

...
  my $timeout = time + 2 ;
  while(time < $timeout) { kill ALRM => getppid ; } ;
} ;