perltw

(source, CPAN)

You are viewing the version of this documentation from Perl 5.8.3. View the latest version

NAME
DESCRIPTION
SEE ALSO
AUTHORS

#NAME

perltw - ¥¿Åé¤¤¤å Perl «ü«n

#DESCRIPTION

Åwªï¨Ó¨ì Perl ªº¤Ñ¦a!

±q 5.8.0 ª©¶}©l, Perl ¨ã³Æ¤F§¹µ½ªº Unicode (¸U°ê½X) ¤ä´©, ¤]³s±a¤ä´©¤F³\¦h©Ô¤B»y¨t¥H¥~ªº½s½X¤è¦¡; CJK (¤¤¤éÁú) «K¬O¨ä¤¤ªº¤@³¡¥÷. Unicode ¬O°ê»Ú©Êªº¼Ð·Ç, ¸Õ¹Ï²[»\¥@¬É¤W©Ò¦³ªº¦r²Å: ¦è¤è¥@¬É, ªF¤è¥@¬É, ¥H¤Î¨âªÌ¶¡ªº¤@¤Á (§ÆÃ¾¤å, ±Ô§Q¨È¤å, ªü©Ô§B¤å, §Æ§B¨Ó¤å, ¦L«×¤å, ¦L¦a¦w¤å, µ¥µ¥). ¥¦¤]®e¯Ç¤F¦hºØ§@·~¨t²Î»P¥»O (¦p PC ¤Î³Áª÷¶ð).

Perl ¥»¨¥H Unicode ¶i¦æ¾Þ§@. ³oªí¥Ü Perl ¤º³¡ªº¦r¦ê¸ê®Æ¥i¥Î Unicode ªí¥Ü; Perl ªº¨ç¦¡»Pºâ²Å (¨Ò¦p¥¿³Wªí¥Ü¦¡¤ñ¹ï) ¤]¯à¹ï Unicode ¶i¦æ¾Þ§@. ¦b¿é¤J¤Î¿é¥X®É, ¬°¤F³B²z¥H Unicode ¤§«eªº½s½X¤è¦¡Àx¦sªº¸ê®Æ, Perl ´£¨Ñ¤F Encode ³oÓ¼Ò²Õ, ¥i¥HÅý§A»´©ö¦aÅª¨ú¤Î¼g¤JÂÂ¦³ªº½s½X¸ê®Æ.

Encode ©µ¦ù¼Ò²Õ¤ä´©¤U¦C¥¿Åé¤¤¤åªº½s½X¤è¦¡ ('big5' ªí¥Ü 'big5-eten'):

big5-eten   Big5 ½s½X (§tÊ¤Ñ©µ¦ù¦r§Î)
big5-hkscs  Big5 + »´ä¥~¦r¶°, 2001 ¦~ª©
cp950       ¦r½X¶ 950 (Big5 + ·L³n²K¥[ªº¦r²Å)

Á|¨Ò¨Ó»¡, ±N Big5 ½s½XªºÀÉ®×Âà¦¨ Unicode, ¯»ÝÁä¤J¤U¦C«ü¥O:

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

Perl ¤]¤ºªþ¤F "piconv", ¤@¤ä§¹¥þ¥H Perl ¼g¦¨ªº¦r²ÅÂà´«¤u¨ãµ{¦¡, ¥Îªk¦p¤U:

piconv -f big5 -t utf8 < file.big5 > file.utf8
piconv -f utf8 -t big5 < file.utf8 > file.big5

¥t¥~, §Q¥Î encoding ¼Ò²Õ, §A¥i¥H»´©ö¼g¥X¥H¦r²Å¬°³æ¦ìªºµ{¦¡½X, ¦p¤U©Ò¥Ü:

#!/usr/bin/env perl
# ±Ò°Ê big5 ¦r¦ê¸ÑªR; ¼Ð·Ç¿é¥X¤J¤Î¼Ð·Ç¿ù»~³£³]¬° big5 ½s½X
use encoding 'big5', STDIN => 'big5', STDOUT => 'big5';
print length("Àd¾m");            #  2 (Âù¤Þ¸¹ªí¥Ü¦r²Å)
print length('Àd¾m');            #  4 (³æ¤Þ¸¹ªí¥Ü¦ì¤¸²Õ)
print index("½Î½Î±Ð»£", "Î½Î±"); # -1 (¤£¥]§t¦¹¤l¦r¦ê)
print index('½Î½Î±Ð»£', 'Î½Î±'); #  1 (±q²Ä¤GÓ¦ì¤¸²Õ¶}©l)

¦b³Ì«á¤@¦C¨Ò¤l¸Ì, "½Î" ªº²Ä¤GÓ¦ì¤¸²Õ»P "½Î" ªº²Ä¤@Ó¦ì¤¸²Õµ²¦X¦¨ Big5 ½Xªº "Î½"; "½Î" ªº²Ä¤GÓ¦ì¤¸²Õ«h»P "±Ð" ªº²Ä¤@Ó¦ì¤¸²Õµ²¦X¦¨ "Î±". ³o¸Ñ¨M¤F¥H«e Big5 ½X¤ñ¹ï³B²z¤W±`¨£ªº°ÝÃD.

#ÃB¥~ªº¤¤¤å½s½X

¦pªG»Ýn§ó¦hªº¤¤¤å½s½X, ¥i¥H±q CPAN (http://www.cpan.org/) ¤U¸ü Encode::HanExtra ¼Ò²Õ. ¥¦¥Ø«e´£¨Ñ¤U¦C½s½X¤è¦¡:

cccii       1980 ¦~¤å«Ø·|ªº¤¤¤å¸ê°T¥æ´«½X
euc-tw      Unix ©µ¦ù¦r²Å¶°, ¥]§t CNS11643 ¥± 1-7
big5plus    ¤¤¤å¼Æ¦ì¤Æ§Þ³N±À¼s°òª÷·|ªº Big5+
big5ext     ¤¤¤å¼Æ¦ì¤Æ§Þ³N±À¼s°òª÷·|ªº Big5e

¥t¥~, Encode::HanConvert ¼Ò²Õ«h´£¨Ñ¤FÂ²ÁcÂà´«¥Îªº¨âºØ½s½X:

big5-simp   Big5 ¥¿Åé¤¤¤å»P Unicode Â²Åé¤¤¤å¤¬Âà
gbk-trad    GBK Â²Åé¤¤¤å»P Unicode ¥¿Åé¤¤¤å¤¬Âà

Y·Q¦b GBK »P Big5 ¤§¶¡¤¬Âà, ½Ð°Ñ¦Ò¸Ó¼Ò²Õ¤ºªþªº b2g.pl »P g2b.pl ¨â¤äµ{¦¡, ©Î¦bµ{¦¡¤º¨Ï¥Î¤U¦C¼gªk:

use Encode::HanConvert;
$euc_cn = big5_to_gb($big5); # ±q Big5 Âà¬° GBK
$big5 = gb_to_big5($euc_cn); # ±q GBK Âà¬° Big5

#¶i¤@¨Bªº¸ê°T

½Ð°Ñ¦Ò Perl ¤ºªþªº¤j¶q»¡©ú¤å¥ó (¤£©¯¥þ¬O¥Î^¤å¼gªº), ¨Ó¾Ç²ß§ó¦hÃö©ó Perl ªºª¾ÃÑ, ¥H¤Î Unicode ªº¨Ï¥Î¤è¦¡. ¤£¹L, ¥~³¡ªº¸ê·½¬Û·íÂ×´I:

#´£¨Ñ Perl ¸ê·½ªººô§}

#http://www.perl.com/: Perl ªºº¶ (¥Ñ¼ÚµÜÂ§¤½¥qºûÅ@)
#http://www.cpan.org/: Perl ºî¦X¨åÂÃºô (Comprehensive Perl Archive Network)
#http://lists.perl.org/: Perl ¶l»¼½×¾Â¤@Äý

#¾Ç²ß Perl ªººô§}

#Perl ¨Ï¥ÎªÌ¶°·|

#http://www.pm.org/groups/asia.shtml#Taiwan: »OÆW Perl ±À¼s²Õ¤@Äý
#http://irc.elixus.org/: ÃÀ¥ß¨ó½u¤W²á¤Ñ«Ç

#Unicode ¬ÛÃöºô§}

#http://www.cl.cam.ac.uk/%7Emgk25/unicode.html: Unix/Linux ¤Wªº UTF-8 ¤Î Unicode µª«È°Ý

#¤¤¤å¤Æ¸ê°T

#¬°¤°»ò¥s "¥¿Åé¤¤¤å" ¤£¥s "ÁcÅé¤¤¤å"?: http://www.csie.ntu.edu.tw/~b7506051/mozilla/faq.html#faqglossary
#¤¤¤å¤Æ³nÅéÁp·ù: http://www.cpatch.org/
#Linux ³nÅé¤¤¤å¤Æp¹º: http://www.linux.org.tw/CLDP/

#AUTHORS

Jarkko Hietaniemi <jhi@iki.fi>

1 POD Error

The following errors were encountered while parsing the POD:

#Around line 13:: Non-ASCII character seen before =encoding in '¥¿Åé¤¤¤å'. Assuming CP1252

CONTENTS

#NAME

#DESCRIPTION

#ÃB¥~ªº¤¤¤å½s½X

#¶i¤@¨Bªº¸ê°T

#´£¨Ñ Perl ¸ê·½ªººô§}

#¾Ç²ß Perl ªººô§}

#Perl ¨Ï¥ÎªÌ¶°·|

#Unicode ¬ÛÃöºô§}

#¤¤¤å¤Æ¸ê°T

#SEE ALSO

#AUTHORS