Help for this page

Select Code to Download


  1. or download this
            foreach my $c ( @{$child_aref} ) {
                @{$child_aref} = grep { $_ ne $c } @{$child_aref} if (
+ waitpid($c, WNOHANG) < 0 );
  2. or download this
    If any part of LIST is an array, "foreach" will get very confused if y
+ou
add or remove elements within the loop body, for example with "splice"
+. So
don't do that.