while ( my $child_process = waitpid(-1,WNOHANG) > 0 ) {
}