猿用のテンプレってこれだっけ？
次スレからは入れような。

---------------------------------------------------------
#　　【Perl 日本語処理の基礎の基礎】
#　このレスは、Windows の ActivePerl で日本語処理を行う場合のテンプレートです。
#　このレスの内容をそのまま、UTF8 形式のソースファイルに保存して下さい。
#　入出力ともシフトJIS形式のファイルまたはDOS窓を想定しています。
#　まず、以下の行を先頭に入れて下さい。
use utf8;
use open IO => ":encoding(cp932)";
binmode STDIN => ":encoding(cp932)";
binmode STDOUT => ":encoding(cp932)";
binmode STDERR => ":encoding(cp932)";
#　次に、あなたが実行したい処理の内容を入れて下さい。
print "SJISには、「十表貼申予暴」のようなダメ文字がある。\n";
sleep(1);
#　以上の内容は、日本語処理が解らない人でも、とりあえず日本語処理ができてしまう
#　おまじないです。条件が異なる場合の対処方法は、ご自分で勉強して下さい。