Perlで、配列に特定の要素が存在することを調べる方法を紹介します。 このエントリーはビギナー向けの内容です。 1.問題点 配列変数fooの要素に"hoge"という文字列があることを調べたいので次のような赤色で示すコードを用意しました。 my @foo = ( "bar", "hoge", "fuga" ); for my $data ( @foo ) { print "OK" if $data eq "hoge"; } このコードでは"hoge"が配列fooに複数存在する場合、"OK"が複数回出力されることになります。 1回だけ出力したい場合は、 for my $data ( @foo ) { if ( $data eq "hoge" ) { print "OK"; last; } } とlastを追加すればいいのですが、もう少し簡単なコードで実装したいところです。 2.配列に要素が存在