イイ!! プログラミング Blog

定数の定義 サンプルコード

Perlで定数を定義するには、contantモジュールを使う。

 use constant CONST_INT => 1234;
 use constant CONST_ARR => ['a', 'b', 'c'];
 use constant CONST_HSH => {'key' => 'val'};

 print CONST_INT, "\n";
 print CONST_ARR->[0], "\n";
 print CONST_HSH->{'key'}, "\n";

定数で、配列やハッシュを扱う場合はリファレンスを利用する。
以下のような書き方はダメ。

use constant CONST_ARR => ('a', 'b', 'c');
use constant CONST_HSH => ('key' => 'a');

構築環境：Perl5.6.1

参考文献

この投稿は 2006 年 1 月 31 日 火曜日 1:22 AM に perl カテゴリーに公開されました。 この投稿へのコメントは RSS 2.0 フィードで購読することができます。 現在コメントは受け付けておりませんが、ご自分のサイトからトラックバックを送ることはできます。