MirBSD manpage: perlcn(1)

README.CN(1)    Perl Programmers Reference Guide     README.CN(1)

NAME

     perlcn - <rLeVPND Perl V8DO

DESCRIPTION

     ;6S-@45= Perl 5DLl5X!

     4S 5.8.0 0f?*J<, Perl >_18AKMjIF5D Unicode (M3R;Bk) V'T.,
     R2A,4xV'T.AKPm6`@-6!SoO5RTMb5D1`Bk7=J=; CJK (VPHU:+)
     1cJGFdVP5DR;2?7]. Unicode JG9z<JPT5D1jW<, JTM<:-
     8GJ@=gIOKySP5DWV7{: Nw7=J@=g, 6+7=J@=g, RT<0A=U_<d5DR;GP
     (O#@0ND, Pp@{QGND, QG@-2.ND, O#2.@4ND, S!6HND, S!5X02ND,
     5H5H). K|R2H]DIAK6`VVWwR5O5M3SkF=L( (Hg PC <0Bs=pK~).

     Perl 1>ImRT Unicode =xPP2YWw. Ub1mJ> Perl
     DZ2?5DWV7{4.J}>]?ISC Unicode 1mJ>; Perl 5D:/J=SkKc7{
     (@}HgU}9f1mJ>J=1H6T) R2D6T Unicode =xPP2YWw. TZJdHk<0Jd3vJ1,
     N*AK4&@mRT Unicode V.G05D1`Bk7=J=4f7E5DJ}>], Perl La9)AK
     Encode Ub8vD#?i, ?IRTHCDcGaRW5X6AH!<0P4Hk>ISP5D1`BkJ}>].

     Encode QSIlD#?iV'T.OBAP<rLeVPND5D1`Bk7=J= ('gb2312' 1mJ>
     'euc-cn'):

         euc-cn      Unix QSIlWV7{</, R2>MJGKW3F5D9z1jBk
         gb2312-raw  N4>-4&@m5D (5M1HLX) GB2312 WV7{1m
         gb12345     N4>-4&@m5DVP9zSC71LeVPND1`Bk
         iso-ir-165  GB2312 + GB6345 + GB8565 + PBTvWV7{
         cp936       WVBkR3 936, R2?IRTSC 'GBK' (@)3d9z1jBk) V8Cw
         hz          7 1HLXR]3vJ= GB2312 1`Bk

     >Y@}@4K5, =+ EUC-CN 1`Bk5D5508W*3I Unicode,
     lsPh<|HkOBAPV8An:

         perl -Mencoding=euc-cn,STDOUT,utf8 -pe1 < file.euc-cn > file.utf8

     Perl R2DZ8=AK "piconv", R;V'MjH+RT Perl
     P43I5DWV7{W*;;9$>_3LPr, SC7(HgOB:

         piconv -f euc-cn -t utf8 < file.euc-cn > file.utf8
         piconv -f utf8 -t euc-cn < file.utf8 > file.euc-cn

     AmMb, @{SC encoding D#?i,
     Dc?IRTGaRWP43vRTWV7{N*5%N;5D3LPrBk, HgOBKyJ>:

         #!/usr/bin/env perl
         # Ft6/ euc-cn WV4.=bNv; 1jW<Jd3vHk<01jW<4mNs6<IhN* euc-cn 1`Bk
         use encoding 'euc-cn', STDIN => 'euc-cn', STDOUT => 'euc-cn';
         print length("BfMU");            #  2 (K+R}:E1mJ>WV7{)
         print length('BfMU');            #  4 (5%R}:E1mJ>WV=Z)
         print index("W;W;=L;e", ";W;="); # -1 (2;0|:,4KWSWV7{4.)
         print index('W;W;=L;e', ';W;='); #  1 (4S5Z6~8vWV=Z?*J<)

perl v5.8.8                2006-06-30                           1

README.CN(1)    Perl Programmers Reference Guide     README.CN(1)

     TZWn:sR;AP@}WS@o, "W;" 5D5Z6~8vWV=ZSk "W;"
     5D5ZR;8vWV=Z=a:O3I EUC-CN Bk5D ";W"; "W;" 5D5Z6~8vWV=ZTrSk
     "=L" 5D5ZR;8vWV=Z=a:O3I ";=". Ub=b>vAKRTG0 EUC-CN
     Bk1H6T4&@mIO3#<{5DNJLb.

     6nMb5DVPND1`Bk

     Hg9{PhR*8|6`5DVPND1`Bk, ?IRT4S CPAN (<http://www.cpan.org/>)
     OBTX Encode::HanExtra D#?i. K|D?G0La9)OBAP1`Bk7=J=:

         gb18030     @)3d9}5D9z1jBk, 0|:,71LeVPND

     AmMb, Encode::HanConvert D#?iTrLa9)AK<r71W*;;SC5DA=VV1`Bk:

         big5-simp   Big5 71LeVPNDSk Unicode <rLeVPND;%W*
         gbk-trad    GBK <rLeVPNDSk Unicode 71LeVPND;%W*

     HtOkTZ GBK Sk Big5 V.<d;%W*, Gk2N?<8CD#?iDZ8=5D b2g.pl Sk
     g2b.pl A=V'3LPr, ;rTZ3LPrDZJ9SCOBAPP47(:

         use Encode::HanConvert;
         $euc_cn = big5_to_gb($big5); # 4S Big5 W*N* GBK
         $big5 = gb_to_big5($euc_cn); # 4S GBK W*N* Big5

     =xR;2=5DPEO"

     Gk2N?< Perl DZ8=5D4sA?K5CwND<~ (2;PRH+JGSCS"NDP45D),
     @4Q'O08|6`9XSZ Perl 5DV*J6, RT<0 Unicode 5DJ9SC7=J=. 2;9},
     Mb2?5DWJT4O`517a8;:

     La9) Perl WJT45DMxV7

     <http://www.perl.com/>
         Perl 5DJWR3 (SIE7@3@q9+K>N,;$)

     <http://www.cpan.org/>
         Perl W[:O5d2XMx (Comprehensive Perl Archive Network)

     <http://lists.perl.org/>
         Perl SJ5]B[L3R;@@

     Q'O0 Perl 5DMxV7

     <http://www.oreilly.com.cn/html/perl.html>
         <rLeVPND0f5DE7@3@q Perl Ji=e

     Perl J9SCU_</;a

     <http://www.pm.org/groups/asia.shtml#China>
         VP9z Perl MF9cWiR;@@

perl v5.8.8                2006-06-30                           2

README.CN(1)    Perl Programmers Reference Guide     README.CN(1)

     Unicode O`9XMxV7

     <http://www.unicode.org/>
         Unicode Q'JuQ';a (Unicode 1jW<5DVF6(U_)

     <http://www.cl.cam.ac.uk/%7Emgk25/unicode.html>
         Unix/Linux IO5D UTF-8 <0 Unicode 4p?MNJ

SEE ALSO

     Encode, Encode::CN, encoding, perluniintro, perlunicode

AUTHORS

     Jarkko Hietaniemi <jhi@iki.fi>

     Autrijus Tang (LFWZ::) <autrijus@autrijus.org>

perl v5.8.8                2006-06-30                           3