Help for this page

Select Code to Download

Select or download this

@$newLoop = map {
  my $hash = { PARTNAME => $_ };
...

  $hash;
  } @$parts;