It looks like you've taken the main if($pid=fork) - else code from the Perl Cookbook 16.10 but you've forgotten about waitpid. Either go back to the Cookbook and look closer or use perldoc -f waitpid to read up on its use. 'tis pretty straight-forward.