Select Code to Download

my %match;
$match{$_} = 1 foreach @valuesToMatch;
my @result = grep $match{$_}, @input;