XX 5.8.0 XXXXXXX, Perl XXXXXXXXXXXXXXX Unicode (XXXXXXX) XXXXXX, XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX; CJK (XXXXXXX) XXXXXXXXXXXXXXXXX. Unicode XXXXXXXXXXXXXXXXXXX, XXXXXXXXXXXXXXXXXXXXXXXXXXXXX: XXXXXXXXX, XXXXXXXXXX, XXXXXXXXXXXXXXXXXX (XXXXXXXX, XXXXXXXXXXX, XXXXXXXXXX, XXXXXXXXX, XXXXXXX, XXXXXXXXXX, XXXX). XXXXXXXXXXXXXXXXXXXXXXXXXXX (XX PC XXXXXXXXXX).
Perl XXXXXXX Unicode XXXXXXXXX. XXXXX Perl XXXXXXXXXXXXXXXXXXXXXXXX Unicode XXX; Perl XXXXXXXXXXXXXX (XXXXXXXXXXXXXXXXX) XXXXXXX Unicode XXXXXXXXX. XXXXXXXXXXXXXXXXX, XXXXXXXXXXX Unicode XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX, Perl XXXXXXX Encode XXXXXXXX, XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX.
Encode XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX ('gb2312' XXX 'euc-cn'):
    euc-cn      Unix XXXXXXXXXX, XXXXXXXXXXXXXXXXXXXX
    gb2312-raw  XXXXXXXXXXXXX (XXXXXXX) GB2312 XXXXX
    gb12345     XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
    iso-ir-165  GB2312 + GB6345 + GB8565 + XXXXXXXX
    cp936       XXXXXXX 936, XXXXXXXXX 'GBK' (XXXXXXXXXXXXX) XXXXXX
    hz          7 XXXXXXXXXXX GB2312 XXXXX
XXXXXXXXX, XX EUC-CN XXXXXXXXXXXXXXXXX Unicode, XXXXXXXXXXXXXXXXXXXXX:
    perl -Mencoding=euc-cn,STDOUT,utf8 -pe1 < file.euc-cn > file.utf8
Perl XXXXXXXXXX ``piconv'', XXXXXXXXXXX Perl XXXXXXXXXXXXXXXXXXXXXXXXXX, XXXXXXXXX:
    piconv -f euc-cn -t utf8 < file.euc-cn > file.utf8
    piconv -f utf8 -t euc-cn < file.utf8 > file.euc-cn
XXXXX, XXXXX encoding XXXX, XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX, XXXXXXXXX:
    #!/usr/bin/env perl
    # XXXXXX euc-cn XXXXXXXX; XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX euc-cn XXXXX
    use encoding 'euc-cn', STDIN => 'euc-cn', STDOUT => 'euc-cn';
    print length("XXXX");            #  2 (XXXXXXXXXXXXXXX)
    print length('XXXX');            #  4 (XXXXXXXXXXXXXXXX)
    print index("XXXXXXXXX", "XXXXXX"); # -1 (XXXXXXXXXXXXXXXXXX)
    print index('XXXXXXXXX', 'XXXXXX'); #  1 (XXXXXXXXXXXXXXXXX)
XXXXXXXXXXXXXXXXXXXX, ``XX'' XXXXXXXXXXXXXXXX ``XX'' XXXXXXXXXXXXXXXXXXXXXX EUC-CN XXXXXX ``XXX''; ``XX'' XXXXXXXXXXXXXXXXXXX ``XXX'' XXXXXXXXXXXXXXXXXXXXXX ``XXX''. XXXXXXXXXXXX EUC-CN XXXXXXXXXXXXXXXXXXXXXXXXXX.
    gb18030     XXXXXXXXXXXXXXXXXX, XXXXXXXXXXXXXXX
XXXXX, Encode::HanConvert XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX:
    big5-simp   Big5 XXXXXXXXXXX Unicode XXXXXXXXXXXXX
    gbk-trad    GBK XXXXXXXXXXX Unicode XXXXXXXXXXXXX
XXXXXXX GBK XX Big5 XXXXXXXXX, XXXXXXXXXXXXXXXXXXXXXX b2g.pl XX g2b.pl XXXXXXXX, XXXXXXXXXXXXXXXXXXXXXXXXXXX:
    use Encode::HanConvert;
    $euc_cn = big5_to_gb($big5); # XX Big5 XXXX GBK
    $big5 = gb_to_big5($euc_cn); # XX GBK XXXX Big5
 
Autrijus Tang (XXXXXXX) <autrijus@autrijus.org>