1# vim: syntax=pod 2 3=encoding utf8 4 5=head1 NAME 6 7perljp - 日本語 Perl ガイド 8 9=head1 説明 10 11Perl の世界へようこそ! 12 13Perl 5.8.0 より、Unicodeサポートが大幅に強化され、その結果ラテン文字以外の文字コードのサポートが CJK (中国語、日本語、ハングル)を含めて加わりました。Unicodeは世界中の文字を一つの文字コードで扱うことを目指した標準規格であり、東から西、はたまたその間の文字（ギリシャ文字、キリール文字、アラビア文字、ヘブライ文字、ディーヴァナガーリ文字、などなど）や、これまではOSベンダーが独自に定めていた文字(PCおよびMacintosh)がすでに含まれています。 14 15Perl 自身は Unicode で動作します。Perl スクリプト内の文字列リテラルや正規表現は Unicode を前提としています。そして入出力のためには、これまで使われてきたさまざまな文字コードに対応するモジュール、「 Encode 」が標準装備されており、Unicode とこれらの文字コードの相互変換も簡単に行えるようになっています。 16 17現時点で Encode がサポートする文字コードは以下のとおりです。 18 19 7bit-jis AdobeStandardEncoding AdobeSymbol AdobeZdingbat 20 ascii big5 big5-hkscs cp1006 21 cp1026 cp1047 cp1250 cp1251 22 cp1252 cp1253 cp1254 cp1255 23 cp1256 cp1257 cp1258 cp37 24 cp424 cp437 cp500 cp737 25 cp775 cp850 cp852 cp855 26 cp856 cp857 cp860 cp861 27 cp862 cp863 cp864 cp865 28 cp866 cp869 cp874 cp875 29 cp932 cp936 cp949 cp950 30 dingbats euc-cn euc-jp euc-kr 31 gb12345-raw gb2312-raw gsm0338 hp-roman8 32 hz iso-2022-jp iso-2022-jp-1 iso-8859-1 33 iso-8859-10 iso-8859-11 iso-8859-13 iso-8859-14 34 iso-8859-15 iso-8859-16 iso-8859-2 iso-8859-3 35 iso-8859-4 iso-8859-5 iso-8859-6 iso-8859-7 36 iso-8859-8 iso-8859-9 iso-ir-165 jis0201-raw 37 jis0208-raw jis0212-raw johab koi8-f 38 koi8-r koi8-u ksc5601-raw MacArabic 39 MacCentralEurRoman MacChineseSimp MacChineseTrad MacCroatian 40 MacCyrillic MacDingbats MacFarsi MacGreek 41 MacHebrew MacIcelandic MacJapanese MacKorean 42 MacRoman MacRomanian MacRumanian MacSami 43 MacSymbol MacThai MacTurkish MacUkrainian 44 nextstep posix-bc shiftjis symbol 45 UCS-2BE UCS-2LE UTF-16 UTF-16BE 46 UTF-16LE UTF-32 UTF-32BE UTF-32LE 47 utf8 viscii 48 49(全114種類) 50 51例えば、文字コードFOOのファイルをUTF-8に変換するには、以下のようにします。 52 53 perl -Mencoding=FOO,STDOUT,utf8 -pe1 < file.FOO > file.utf8 54 55また、Perlには、全部がPerlで書かれた文字コード変換ユーティリティ、piconvも付属しているので、以下のようにすることもできます。 56 57 piconv -f FOO -t utf8 < file.FOO > file.utf8 58 piconv -f utf8 -t FOO < file.utf8 > file.FOO 59 60=head2 (jcode.pl|Jcode.pm|JPerl) からの移行 61 625.8以前の、スクリプトがEUC-JPであればリテラルだけは扱うことができました。また、入出力を扱うモジュールとしてはJcode.pmが( L<http://openlab.ring.gr.jp/Jcode/> )、perl4用のユーティリティとしてはjcode.plがそれぞれ存在し、日本語の扱えるCGIでよく利用されていることを御存じの方も少なくないかと思われます。ただし、日本語による正規表現をうまく扱うことは不可能でした。 63 645.005以前のPerlには、日本語に特化したローカライズ版、Jperlが存在しました( L<http://homepage2.nifty.com/kipp/perl/jperl/index.html> ※1)。また、Mac OS 9.x/Classic用のPerl、MacPerlの日本語版もMacJPerlとして存在してました。( L<https://habilis.net/macjperl/> ).これらでは文字コードとしてEUC-JPに加えShift_JISもそのまま扱うことができ、また日本語による正規表現を扱うことも可能でした。 65 66Perl5.8では、これらの機能がすべてPerl本体だけで実現できる上に、日本語のみならず上記114の文字コードをすべて、しかも同時に扱うことができます。さらに、CPANなどから新しい文字コード用のモジュールを入手することも簡単にできるようになっています。 67 68※1: ホスティングサービスの終了により現在は閲覧できません。 Vector( L<https://www.vector.co.jp/soft/win95/util/se098198.html> )からWindow用のバイナリを、CPAN( L<https://www.cpan.org/src/unsupported/4.036/jperl/> )からperl4用のパッチを入手することができます。 69 70=over 4 71 72=item * 73 74入出力 75 76以下の例はいずれもShift_JISの入力をEUC-JPに変換して出力します。 77 78 # jcode.pl 79 require "jcode.pl"; 80 while(<>){ 81 jcode::convert(*_, 'euc', 'sjis'); 82 print; 83 } 84 # Jcode.pm 85 use Jcode; 86 while(<>){ 87 print Jcode->new($_, 'sjis')->euc; 88 } 89 # Perl 5.8 90 use Encode; 91 while(<>){ 92 from_to($_, 'shiftjis', 'euc-jp'); 93 print; 94 } 95 # Perl 5.8 - encoding を利用して 96 use encoding 'euc-jp', STDIN => 'shiftjis'; 97 while(<>){ 98 print; 99 } 100 101=item * 102 103Jperl 互換スクリプト 104 105いわゆる"shebang"を変更するだけで、Jperl用のscriptのほとんどは変更なしに利用可能だと思われます。 106 107 #!/path/to/jperl 108 ↓ 109 #!/path/to/perl -Mencoding=euc-jp 110 111詳しくは perldoc encoding を参照してください。 112 113=back 114 115=head2 さらに詳しく 116 117Perlには膨大な資料が付属しており、Perlの新機能やUnicodeサポート、そしてEncodeモジュールの使用法などが細かく網羅されています（残念ながら、ほとんど英語ではありますが）。以下のコマンドでそれらの一部を閲覧することが可能です。 118 119 perldoc perlunicode # PerlのUnicodeサポート全般 120 perldoc Encode # Encodeモジュールに関して 121 perldoc Encode::JP # うち日本語文字コードに関して 122 123=head2 Perl全般に関する URL 124 125=over 4 126 127=item L<https://www.perl.org/> 128 129Perl ホームページ 130 131=item L<https://www.perl.com/> 132 133Perl 財団が営業する文章作品集 134 135=item L<https://www.cpan.org/> 136 137CPAN (Comprehensive Perl Archive Network) 138 139=item L<https://metacpan.org/> 140 141MetaCPAN CPANの検索エンジン 142 143=item L<https://lists.perl.org/> 144 145Perl メーリングリスト集 146 147=item L<https://perldoc.jp/> 148 149perldoc.jp Perl の公式ドキュメント、モジュールドキュメントの日本語訳 150 151=back 152 153=head2 Perlの修得に役立つ URL 154 155=over 4 156 157=item L<http://www.oreilly.com.cn/> 158 159O'Reilly 社のPerl関連書籍(簡体字中国語) 160 161=item L<https://www.oreilly.co.jp/catalog/> 162 163オライリー社のPerl関連書籍(日本語) 164 165=back 166 167=head2 Perl に関する団体 168 169=over 4 170 171=item L<https://www.pm.org/groups/asia.html> 172 173アジア地域の Perl Mongers (Perlのユーザーグループ) 一覧 174 175=item L<https://japan.perlassociation.org> 176 177一般社団法人Japan Perl Association (JPA) Perl技術及び文化の啓蒙・促進のための組織 178 179=back 180 181=head2 Unicode関連のURL 182 183=over 4 184 185=item L<https://www.unicode.org/> 186 187Unicode コンソーシアム (Unicode規格の選定団体) 188 189=item L<https://www.cl.cam.ac.uk/%7Emgk25/unicode.html> 190 191UTF-8 and Unicode FAQ for Unix/Linux 192 193=item L<https://wiki.kldp.org/Translations/html/UTF8-Unicode-KLDP/UTF8-Unicode-KLDP.html> 194 195UTF-8 and Unicode FAQ for Unix/Linux (ハングル訳) 196 197=back 198 199=head1 AUTHORS 200 201=over 202 203=item * Jarkko Hietaniemi E<lt>jhi@iki.fiE<gt> 204 205=item * Dan Kogai (小飼 弾) E<lt>dankogai@dan.co.jpE<gt> 206 207=item * Shogo Ichinose (一野瀬 翔吾) E<lt>shogo82148@gmail.comE<gt> 208 209=back 210 211=cut 212