sub child_handler
{
  1 while -1 != waitpid -1, WNOHANG;
}