Select Code to Download

my @array1 = qw(perl monks camel);
my @array2 = qw(node thread monks);
...
for (@array1, @array2) {
  $hash{$_}++;
}