perltw − XXXXXXXX Perl XXXXXX |
XXXXXXXXX Perl XXXXXXX ! XX 5.8.0 XXXXXXXX , Perl XXXXXXXXXXXXXXX Unicode ( XXXXXXX ) XXXXX , XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX ; CJK ( XXXXXX ) XXXXXXXXXXXXXXXX . Unicode XXXXXXXXXXXXXXXXX , XXXXXXXXXXXXXXXXXXXXXXXXXXXX: XXXXXXXXX , XXXXXXXXXX , XXXXXXXXXXXXXXXXXXXX ( XXXXXXXX , XXXXXXXXXXX , XXXXXXXXX , XXXXXXXXX , XXXXXXX , XXXXXXXXXX , XXXX ). XXXXXXXXXXXXXXXXXXXXXXXXXXX ( XX PC XXXXXXXXX ). Perl XXXXXX Unicode XXXXXXXXXX . XXXXXX Perl XXXXXXXXXXXXXXXXXXXXX Unicode XXX ; Perl XXXXXXXXXXXXXXX ( XXXXXXXXXXXXXXXXX ) XXXXXXX Unicode XXXXXXXXXX . XXXXXXXXXXXXXXX , XXXXXXXXXXXXX Unicode XXXXXXXXXXXXXXXXXXXXXXXXXXXXX , Perl XXXXXXX Encode XXXXXXXXXX , XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX . Encode XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX (’big5’ XXX ’big5−eten’): big5−eten Big5 XXX (XXXXXXXXXXXXXX) big5−hkscs Big5 + XXXXXXXXXXX, 2001 XXXX cp950 XXXXXX 950 (Big5 + XXXXXXXXXXXXXXX) XXXXXXXXX , XX Big5 XXXXXXXXXXXXXXX Unicode, XXXXXXXXXXXXXXXXXXXX: perl −Mencoding=big5,STDOUT,utf8 −pe1 < file.big5 > file.utf8 Perl XXXXXXXXX "piconv", XXXXXXXXXXX Perl XXXXXXXXXXXXXXXXXXXXXXXX , XXXXXXXXX: piconv −f big5 −t utf8 < file.big5 > file.utf8 piconv −f utf8 −t big5 < file.utf8 > file.big5 XXXXX , XXXXX encoding XXXX , XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX , XXXXXXXXX: #!/usr/bin/env perl # XXXXXX big5 XXXXXXXX; XXXXXXXXXXXXXXXXXXXXXXXXXXX big5 XXX use encoding 'big5', STDIN => 'big5', STDOUT => 'big5'; print length("XXXX"); # 2 (XXXXXXXXXXXXXXX) print length('XXXX'); # 4 (XXXXXXXXXXXXXXXXXX) print index("XXXXXXXXX", "XXXX"); # −1 (XXXXXXXXXXXXXXX) print index('XXXXXXXXX', 'XXXX'); # 1 (XXXXXXXXXXXXXXXXXXXXX) XXXXXXXXXXXXXXXXXX , " XX " XXXXXXXXXXXXXXXXXXXX " XX " XXXXXXXXXXXXXXXXXXXXXXXXX Big5 XXXX " XX "; " XX " XXXXXXXXXXXXXXXXXXXXXXX " XXX " XXXXXXXXXXXXXXXXXXXXXXXXX " XX ". XXXXXXXXXXXXX Big5 XXXXXXXXXXXXXXXXXXXXXXXXXX . |
XXXXXXXXXXXXXX |
XXXXXXXXXXXXXXXXXXXXXXXXX , XXXXXX CPAN (<http://www.cpan.org/>) XXXX Encode::HanExtra XXXX . XXXXXXXXXXXXXXXXXXXXXXXXX: cccii 1980 XXXXXXXXXXXXXXXXXXXXXXXX euc−tw Unix XXXXXXXXX, XXXXXX CNS11643 XXXX 1−7 big5plus XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX Big5+ big5ext XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX Big5e XXXXX , Encode::HanConvert XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX: big5−simp Big5 XXXXXXXXXXX Unicode XXXXXXXXXXXX gbk−trad GBK XXXXXXXXXXX Unicode XXXXXXXXXXXX XXXXXXX GBK XXX Big5 XXXXXXXXX , XXXXXXXXXXXXXXXXXXXXX b2g.pl XXX g2b.pl XXXXXXXXX , XXXXXXXXXXXXXXXXXXXXXXXXXX: use Encode::HanConvert; $euc_cn = big5_to_gb($big5); # XX Big5 XXXXX GBK $big5 = gb_to_big5($euc_cn); # XX GBK XXXXX Big5 |
XXXXXXXXXXXXX |
XXXXXXXX Perl XXXXXXXXXXXXXXXXXXXXX ( XXXXXXXXXXXXXXXXXX ), XXXXXXXXXXXXXXXX Perl XXXXXXXX , XXXX Unicode XXXXXXXXXXX . XXXXX , XXXXXXXXXXXXXXXXXXXX: |
XXXXX Perl XXXXXXXXXXX |
<http://www.perl.com/> |
Perl XXXXXXXX ( XXXXXXXXXXXXXXXXX ) |
<http://www.cpan.org/> |
Perl XXXXXXXXXXXX (Comprehensive Perl Archive Network) |
<http://lists.perl.org/> |
Perl XXXXXXXXXXXX |
XXXX Perl XXXXXXX |
<http://www.oreilly.com.tw/chinese/perl/index.html> |
XXXXXXXXXXXXXXXXXXXXX Perl XXXXX |
<http://groups.google.com/groups?q=tw.bbs.comp.lang.perl> |
XXXXX Perl XXXXXXXXXXXX ( XXXXXXXXXX BBS XXX Perl XXXXXXXX ) |
Perl XXXXXXXXXXXX |
<http://www.pm.org/groups/asia.html> |
XXXXX Perl XXXXXXXXX |
<http://irc.elixus.org/> |
XXXXXXXXXXXXXXXXXX |
Unicode XXXXXXXXX |
<http://www.unicode.org/> |
Unicode XXXXXXXX (Unicode XXXXXXXXXXXXXXX ) |
<http://www.cl.cam.ac.uk/%7Emgk25/unicode.html> |
Unix/Linux XXXXX UTF−8 XXX Unicode XXXXXX |
XXXXXXXXXXX |
XXXXXXXXX " XXXXXXXX " XXXXX " XXXXXXXX "? |
<http://www.csie.ntu.edu.tw/~b7506051/mozilla/faq.html#faqglossary> |
XXXXXXXXXXXXXXXX |
<http://www.cpatch.org/> |
Linux XXXXXXXXXXXXXXXX |
<http://www.linux.org.tw/CLDP/> |
Encode, Encode::TW, encoding, perluniintro, perlunicode |
Jarkko Hietaniemi <jhi@iki.fi> Audrey Tang ( XXXXX ) <audreyt@audreyt.org> |