$SIG{CHLD} = sub { while( wait() != -1 ){ print STDERR "wait0\n"}; };