- or download this
warn "PID $$ (parent) forking\n";
unless ($pid = fork) {
...
warn "PID $$ (parent) executing waitpid\n";
waitpid($pid,0);
warn "PID $$ (parent) done.\n";
- or download this
warn "PID $$ (parent) forking\n";
unless ($pid = fork) {
...
warn "PID $$ (parent) executing waitpid\n";
waitpid($pid,0);
warn "PID $$ (parent) done.\n";