配列に値が含まれているかどうか調べる(Perl)

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){
 //含まれていたときの処理
}

_^_

# Related Page(s)

• 2011年の記事
• HOME

タグ：Perl

Site Search :

Short Url :