PERLTW(1)        Perl Programmers Reference Guide       PERLTW(1)



NAME
       perltw - YcAexxxa Perl <>y"tYHY~ao1/2s1/2Xxe|i; CJK
       (xxxeAu) <>U(C)Eao1/4D.C, ,O1I2[>>\Y@~ExW(C)O|3ao|r2A:
       |exeY@~E, aFxeY@~E, YHxI"aaI9|iaox@xA (SAEA3/4xa,
       +-OSQ"Exa, au(C_OSBxa, SAESB"Oxa, |L<>PY>>O (|p PC
       xI3Aa-:-9|o).

       Perl Y>>"YH Unicode 9|i|ae3/4bS@. 3oaiYU Perl
       xo3iao|r|e,e(R)AEYiYI U_icode aiYU; Perl ao"c|i>>Poa2A
       ("O|pYc3WaiYU|ixn1i) x] a1i Unicode 9|i|ae3/4bS@.
       |bcexJxIceYX(R)E, ~oxF3B2zYH Unicode
       xS<>'(C)o|aAa"uxI1/4gxJAA|3ao1/2s1/2X,e(R)AE.

       Encode (C)u|u1/4O2Oxa'(C)xU|CYcAexxxaao1/2s1/2Xxe|i
       ('big5' aiYU 'big5-eten'):

           big5-eten   Big5 1/2s1/2X (StExN(C)u|u|rSI)
           big5-hkscs  Big5 + >>'aY~|r9|o, 2001 |~a(C)
           cp950       |r1/2X9| 950 (Big5 + .L3n2KY[ao|r2A)

       _|"O"O>>i, +-N Big5 1/2s1/2XaoAE(R)xAa|" Unicode,
        >>YAaxJxU|C< file.utf8

       Perl x]xoabxF "piconv", x@xaS1YbYH Perl
       1/4g|"ao|r2AAa'< file.utf8
           piconv -f utf8 -t big5 < file.utf8 > file.big5

       YtY~, SQYI encoding 1/4O2O,
       SAYiYH>>'(C)o1/4gYXYH|r2A~o3ae|iaou{|i1/2X, |pxU(C)OYU:

           #!/usr/bin/env perl
           # +-OoE big5 |r|e,NaR; 1/4D.CceYXxJxI1/4D.Ccu>>~3L3]~o big5 1/2s1/2X
           use encoding 'big5', STDIN => 'big5', STDOUT => 'big5';
           print length("Ad3/4m");            #  2 (Auxb,1aiYU|r2A)
           print length('Ad3/4m');            #  4 (3aexb,1aiYU|ix,2O)
           print index("1/2I1/2I+-D>>L", "I1/2I+-"); # -1 (xLY]St|1xl|r|e)
           print index('1/2I1/2I+-D>>L', 'I1/2I+-'); #  1 (+-q2AxGO|ix,2O9|}(C)l)

       |b3I<>P "1/2I"
       ao2Ax@O|ix,2Ou2|X|" Big5 1/2Xao "I1/2"; "1/2I"
       ao2AxGO|ix,2O<>P "+-D" ao2Ax@O|ix,2Ou2|X|" "I+-".
       3o,N"MxFYH<>YnSo|haoxxxa1/2s1/2X, YiYH+-q CPAN
       () xU,u Encode::HanExtra 1/4O2O.
       Y|YO<>P Unicode A2Aexxxax~Aa
           gbk-trad    GBK A2Aexxxa>>P Unicode YcAexxxax~Aa

       Y.Q|b GBK >>P Big5 xS9|ix~Aa, 1/2DoN|O,O1/4O2Oxoabao
       b2g.pl >>P g2b.pl "axau{|i, (C)I|bu{|ixo"IYIxU|C1/4gak:

           use Encode::HanConvert;
           $euc_cn = big5_to_gb($big5); # +-q Big5 Aa~o GBK
           $big5 = gb_to_big5($euc_cn); # +-q GBK Aa~o Big5

       9|ix@"Bao,eoT

       1/2DoN_O Perl xoabaoxj9|q>>i(C)uxaYo
       (xL(C) Yb~OYI^xa1/4gao), "O3/4C2BSo|hAo(C)o Perl aoa3/4AN,
       YHxI Unicode ao"IYIxe|i. xL1L, Y~3iao,e.1/2~U.iAx'I:

       'L"N Perl ,e.1/2aoooS}


       
           Perl aoo9| (YN1/4UuUASx1/2YqouA@)

       
           Perl oi|X"aAAoo (Comprehensive Perl Archive Network)

       
           Perl 9|l>>1/41/2x3/4Ax@Ay

       3/4C2B Perl aoooS}


       
           YcAexxxaa(C)ao1/4UuUAS Perl (R)NAC

       
           >>OAEW Perl 3s1/2uoQ1/2xoI (x]'N~O|Uxj BBS ao Perl
           3s1/2ua(C))

       Perl "IYIaI9|o.|


       
           >>OAEW Perl +-A1/4s2Ox@Ay

       
           AAYB"o1/2uxW2axN<
           Unicode 3/4C3N3/4C.| (Unicode 1/4D.Cao"i(C)waI)

       
           Unix/Linux xWao UTF-8 xI Unicode ua<>oYs "YcAexxxa" xLYs "AcAexxxa"?
           

       xxxaxAE3nAeAp.u
           

       Linux 3nAexxxaxAEp1o
           

SEE ALSO
       Encode, Encode::TW, encoding, perluniintro, perlunicode

AUTHORS
       Jarkko Hietaniemi 

       Autrijus Tang (o(C)vo~) 



perl v5.8.8                 2006-01-07                  PERLTW(1)