arrays - 配列の値がPerlのハッシュのキーであるかどうかを見つける方法は？

Question

@arrayという配列があります。配列のどの値がハッシュのキーを形成するのか知りたいのですが、たとえば％hashです。forループを使用する以外にそれを行う簡単な方法はありますか？

例えば、

 @array = qw (a b c);   
 %hash = ( a => 1, b=> 2 );    

この場合、「a」と「b」を出力するだけです。

Answer 1

これはそれを行う必要があります：

my @array = qw(a b c) ;
my %hash = ( a => 1 , b => 2 ) ;

my @result = grep { exists $hash{$_} } @array ;