とあるエンジニアの闇歴史帳

この文書は読取専用です。文書のソースを閲覧することは可能ですが、変更はできません。もし変更したい場合は管理者に連絡してください。

====== ハッシュにキーが存在するか調べる - Perl ======
~~socialite~~
<note important>この記事は2007年03月06日に書かれた物です</note>

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

===== サンプル =====
<code perl>
;#
;#ハッシュに要素が存在するか
;#

#------------------------------#
#まずは追加する
#------------------------------#
#-- 初期化 --#
%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";
}
</code>

===== 実行結果 =====
<code>
OK
NG
</code>

===== 関連書籍 =====
{{amazon>jp:4873113008}}
<html><p style="clear:both"></p></html>

{{amazon>jp:4798139815}}
<html><p style="clear:both"></p></html>

{{tag>CGI・Perl例文集 Perl 連想配列 ハッシュ }}
~~socialite~~

とあるエンジニアの闇歴史帳

ユーザ用ツール

関連ページ

ページ用ツール