今日出会ったCPANモジュール

CPAN

Perlで定数を使用する時は，まず上記2つのモジュールをCPANからインストールする。
実際にプログラムで定数を使用するには以下のようにする。

#!/usr/bin/perl
use strict;
use warnings;

#「Readonly::XS」は use しなくて良い。
#「Readonly」モジュールが「Readonly::XS」を使用するか自動的に判断する。
#「Readonly::XS」がインストールされていれば用い，されていなければ用いない。
#「Readonly::XS」を用いると「Readonly」モジュールは速くなる。
use Readonly; 

Readonly my $PI => 3.141562;

# 「Readonly」モジュールが「Readonly::XS」モジュールを使用しているかは
#  以下の用にして調べる事が可能。
if ($Readonly::XSokay) { 
    print "$PI\n";
}

Perlベストプラクティスには，「constant」モジュールの代わりに「Readonly」モジュールを用いるべきである理由がいくつか書かれていた。