push @mass_info, {"PID" => $PID, "IO" => \@IO}; #### foreach(@mass_info){ print "$_{PID} \n"; } #### $counter = 0; foreach (@mass_info){ print "$mass_info[$counter++]{PID}\n"; }
## foreach(@mass_info){ print "$_{PID} \n"; } ##
## $counter = 0; foreach (@mass_info){ print "$mass_info[$counter++]{PID}\n"; }