■

• YappoLogs: Perl 5.16 の面白そうな新機能を厳選して5つ紹介
• 初心者から見たPerl言語I/Fは気持ち悪いが、たった一行の記述が素晴らしく強力な件について - Yuta.Kikuchiの日記

if( grep{ $_ eq 'key1' } keys %hash ) {
print "exists key1 in hash \n";
}

• • grep {} でくくれるのかなるほど。ベストプラクティスにあったかな？