sub vicious {
#...
  for (0..int(rand(1000))) {
     sleep(int(rand(10)));
#....
     alarm(0);#reset alarm, we're OK
     alarm(10);#reset alarm..
  }; 

#...
alarm(10);
vicious();
alarm(0);