perljp(1)

(jcode.pl|Jcode.pm|JPerl) からの移行

5.8以前の、スクリプトがEUC-JPであればリテラルだけは扱うことができました。また、入出力を扱うモジュールとしてはJcode.pmが( <http://openlab.ring.gr.jp/Jcode/> )、perl4用のユーティリティとしてはjcode.plがそれぞれ存在し、日本語の扱えるCGIでよく利用されていることを御存じの方も少なくないかと思われます。ただし、日本語による正規表現をうまく扱うことは不可能でした。

5.005以前のPerlには、日本語に特化したローカライズ版、Jperlが存在しました( <http://homepage2.nifty.com/kipp/perl/jperl/index.html> ※1)。また、Mac OS 9.x/Classic用のPerl、MacPerlの日本語版もMacJPerlとして存在してました。( <https://habilis.net/macjperl/> ).これらでは文字コードとしてEUC-JPに加えShift_JISもそのまま扱うことができ、また日本語による正規表現を扱うことも可能でした。

Perl5.8では、これらの機能がすべてPerl本体だけで実現できる上に、日本語のみならず上記114の文字コードをすべて、しかも同時に扱うことができます。さらに、CPANなどから新しい文字コード用のモジュールを入手することも簡単にできるようになっています。

※1: ホスティングサービスの終了により現在は閲覧できません。 Vector( <https://www.vector.co.jp/soft/win95/util/se098198.html> )からWindow用のバイナリを、CPAN( <https://www.cpan.org/src/unsupported/4.036/jperl/> )からperl4用のパッチを入手することができます。

•

入出力

以下の例はいずれもShift_JISの入力をEUC-JPに変換して出力します。

  # jcode.pl
  require "jcode.pl";
  while(<>){
    jcode::convert(*_, 'euc', 'sjis');
    print;
  }
  # Jcode.pm
  use Jcode;
  while(<>){
        print Jcode->new($_, 'sjis')->euc;
  }
  # Perl 5.8
  use Encode;
  while(<>){
    from_to($_, 'shiftjis', 'euc-jp');
    print;
  }
  # Perl 5.8 - encoding を利用して
  use encoding 'euc-jp', STDIN => 'shiftjis';
  while(<>){
        print;
  }

•

Jperl 互換スクリプト

いわゆる"shebang"を変更するだけで、Jperl用のscriptのほとんどは変更なしに利用可能だと思われます。

   #!/path/to/jperl
   ↓
   #!/path/to/perl -Mencoding=euc-jp

詳しくは perldoc encoding を参照してください。

さらに詳しく

Perlには膨大な資料が付属しており、Perlの新機能やUnicodeサポート、そしてEncodeモジュールの使用法などが細かく網羅されています（残念ながら、ほとんど英語ではありますが）。以下のコマンドでそれらの一部を閲覧することが可能です。

  perldoc perlunicode # PerlのUnicodeサポート全般
  perldoc Encode      # Encodeモジュールに関して
  perldoc Encode::JP  # うち日本語文字コードに関して

Perl全般に関する URL

<https://www.perl.org/>

Perl ホームページ

<https://www.perl.com/>

Perl 財団が営業する文章作品集

<https://www.cpan.org/>

CPAN (Comprehensive Perl Archive Network)

<https://metacpan.org/>

MetaCPAN CPANの検索エンジン

<https://lists.perl.org/>

Perl メーリングリスト集

<https://perldoc.jp/>

perldoc.jp Perl の公式ドキュメント、モジュールドキュメントの日本語訳

Perlの修得に役立つ URL

<http://www.oreilly.com.cn/>

O'Reilly 社のPerl関連書籍(簡体字中国語)

<https://www.oreilly.co.jp/catalog/>

オライリー社のPerl関連書籍(日本語)

Perl に関する団体

<https://www.pm.org/groups/asia.html>

アジア地域の Perl Mongers (Perlのユーザーグループ) 一覧

<https://japan.perlassociation.org>

一般社団法人Japan Perl Association (JPA) Perl技術及び文化の啓蒙・促進のための組織

Unicode関連のURL

<https://www.unicode.org/>

Unicode コンソーシアム (Unicode規格の選定団体)

<https://www.cl.cam.ac.uk/%7Emgk25/unicode.html>

UTF-8 and Unicode FAQ for Unix/Linux

<https://wiki.kldp.org/Translations/html/UTF8-Unicode-KLDP/UTF8-Unicode-KLDP.html>

UTF-8 and Unicode FAQ for Unix/Linux (ハングル訳)