Perl 以下のようにすると定数が使えるらしい # 値の定義 *PI = \3.141592654; # 値の変更 # $PI = 10; print $PI, "\n"; 定数を変更しようとすると、以下のメッセージが出てエラーが起きる。 Modification of a read-only value attempted at foo.pl line 3. 定数関数というのもあるらしい Perl 5.004 からは以下のような記述ができるらしい use constant PI => 3.141592654; print PI, "\n"; # =>3.141592654 # PI = 10; # エラー 定数を変更しようとすると、以下のメッセージが出てエラーが起きる。 Can't modify constant item in scalar assignment at foo.pl l

