Help for this page

Select Code to Download

Select or download this

   $SIG{CHLD}=\&reaper;

...
      1 while waitpid -1,&POSIX::WNOHANG != -1;
      $SIG{CHLD}=\&reaper;
   }

Select or download this

   use Errno;
   ...
...
   }

   die if $! == ECHILD;