Select Code to Download

my @new_array;
for ( @array ) {
...
  }
}
@array = @new_array;

@array = map { ( /CONTENT/ ) ? getlist( $type, $index ) : $_ } @array;