README.CN(1) Perl Programmers Reference Guide README.CN(1)
perlcn - <rLeVPND Perl V8DO
;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
Encode, Encode::CN, encoding, perluniintro, perlunicode
Jarkko Hietaniemi <jhi@iki.fi>
Autrijus Tang (LFWZ::) <autrijus@autrijus.org>
perl v5.8.8 2006-06-30 3
Generated on 2012-02-20 02:47:02 by $MirOS: src/scripts/roff2htm,v 1.70 2011/12/03 18:21:12 tg Exp $
These manual pages and other documentation are copyrighted by their respective writers;
their source is available at our CVSweb,
AnonCVS, and other mirrors. The rest is Copyright © 2002‒2011 The MirOS Project, Germany.
This product includes material
provided by Thorsten Glaser.
This manual page’s HTML representation is supposed to be valid XHTML/1.1; if not, please send a bug report – diffs preferred.