Perlで、配列にある値が含まれているかどうか調べる方法の一つとして、ハッシュを使う方法があります。
#サンプル配列
my @list = ('microsoft','apple','google');
#検索したい値
my $serachString = 'apple';
#ハッシュの器を作成
my %tmp_hashvalues = ();
#配列をハッシュ化。値として「1」を持たせる。
for (@list) {
$tmp_hashvalues{$_} = 1;
}
#検索したい文字列がハッシュに含まれていれば、1が返ってくる。
if($tmp_hashvalues{$serachString} eq 1){
//含まれていたときの処理
}
タグ：Perl
