ハッシュにキーが存在するか調べる - Perl

ハッシュに指定したキーが存在するかどうか調べたい。exists関数を用いれば良い。 exists関数は、指定したキーが存在すれば真(true)を、存在しなければ偽(false)を返す。

サンプル
実行結果

サンプル

;#
;#ハッシュに要素が存在するか
;#

#------------------------------#
#まずは追加する
#------------------------------#
#-- 初期化 --#
%hash = (
      'name1' => 'value1'
    , 'name2' => 'value2'
    , 'name3' => 'value3'
);

#------------------------------#
#判定
#------------------------------#
#-- 存在する --#
if( exists $hash{'name1'} ){
    print "OK\n";
}
else{
    print "NG\n";
}

#-- 存在しない --#
if( exists $hash{'hoge'} ){
    print "OK\n";
}
else{
    print "NG\n";
}