Select Code to Download

my %search_for;
$search_for{$_} = 1 for @input_array;
...
       # do the copying etc. here
     }
}