do {
  $kid = waitpid(-1,&WNOHANG);
} until $kid == -1;