use encoding "euc-jp"と指定してみる。

日本語を含むスクリプトを書く Perl-5.8 覚え書きのページを参考にためしてみました。

日本語 EUC でスクリプトを書く

#!/usr/bin/perl
use encoding "euc-jp";
print "こんにちは\n";

この内容をmeno1.plにする。

komadas-Computer:~ komada$ perl memo1.pl
Can't open perl script "memo1.pl": No such file or directory
komadas-Computer:~ komada$ komadas-Computer:~ komada$ perl memo1.pl

うまくいかなかった。

binmodeも入れるようだ。

#!/usr/bin/perl
use encoding "euc-jp";
binmode STDERR, "encoding(euc-jp)";
warn "正常に出力されましたか？\n";

この内容をmemo2.plにする。

komadas-Computer:~ komada$ perl memo2.pl
Can't open perl script "memo2.pl": No such file or directory
komadas-Computer:~ komada$

おかしいな。