my @p = map {
    open my $fh, '-|', "ping -w 5 -c 5 $net$_"
      or die "Couldn't start ping for $net$_: $!\n"; 
    $fh } 1..255;