foreach (@myArray) { print "$_\n" if ($myHash{$_}); }