最初に書くもの

#!/usr/bin/perl -w

use strict;
use warnings;
use Encode;
use encoding "euc-jp";
binmode STDERR, ":encoding(euc-jp)";

use lib "/usr/local/lib/perl5/site_perl/5.8.7/i386-linux";
use Readonly;

新規にスクリプトを組もうとすると忘れてしまうので書いておく。use Readonlyは使ったり使わなかったりするから書かないほうが多いかな。あと、ReadonlyはCPANモジュールなので使う環境が限られるし。