$SIG{CHLD} = sub { 
      my $pid = waitpid(-1, 0);
       print ">> eof PID $pid -> $?\n";
   };