Select Code to Download

my $parts = [ 'Part1', 'Part2','Part3' ];
my $newLoop;
...

  push @$newLoop, $hash;
}

my $parts = [ 'Part1', 'Part2','Part3' ];
my $newLoop = [ map {{ PARTNAME => $_,
...
                           ? (SELECTED => 1)
                           : ()
                    }} @$parts ];