Perlのハッシュでキーの有無を調べる方法
小粋空間 » Programming Language » Perl » Perlのハッシュでキーの有無を調べる方法
Perlのハッシュでキーの有無を調べる方法を紹介します。
1.問題点
Perlで下記のようなハッシュを作成しました。
my $hash;
$hash->{orange} = 1;
$hash->{grape} = 1;
$hash->{apple} = 1;
このハッシュに"apple"というキーが存在するか調べたいのですが、方法がわかりません。
ということで、ハッシュにキーが存在するか調べる方法を紹介します。
2.ハッシュにキーが存在するか調べる
ハッシュにキーが存在するか調べるには、exists関数を使用します。
#!/usr/bin/perl
use strict;
my $hash;
$hash->{orange} = 1;
$hash->{grape} = 1;
$hash->{apple} = 1;
if ( exists $hash->{apple} ) {
print "exist";
} else {
print "no exist";
}
"apple"はキーに存在するので、実行結果は、
exist
となります。
if文に記述したハッシュキーを、存在しない任意の文字列に変更してみます。
#!/usr/bin/perl
use strict;
my $hash;
$hash->{orange} = 1;
$hash->{grape} = 1;
$hash->{apple} = 1;
if ( exists $hash->{abc} ) {
print "exist";
} else {
print "no exist";
}
"abc"はキーに存在しないので、実行結果は、
no exist
となります。