my $pid1 = fork err die "fork: $!"; # Get the // patch... unless ($pid1) { # Child 1 count; exit; } my $pid2 = fork err die "fork: $!"; unless ($pid2) { # Child 2 count2; exit; } # Parent. ....