README.cn

   1 If you read this file _as_is_, just ignore the funny characters you
   2 see. It is written in the POD format (see perlpod manpage) which is
   3 specially designed to be readable as is.
   4
   5 The following documentation is written in EUC-CN encoding.
   6
   7 Èç¹ûÄãÓÃÒ»°ãµÄÎÄ×Ö±à¼Æ÷ÔÄÀÀÕâ·ÝÎÄ¼þ, ÇëºöÂÔÎÄÖÐÆæÌØµÄ×¢¼Ç×Ö·û.
   8 Õâ·ÝÎÄ¼þÊÇÒÔ POD (¼òÃ÷ÎÄ¼þ¸ñÊ½) Ð´³É; ÕâÖÖ¸ñÊ½ÊÇÎªÁËÄÜÈÃÈËÖ±½ÓÔÄ¶Á,
   9 ¶øÌØ±ðÉè¼ÆµÄ. ¹ØÓÚ´Ë¸ñÊ½µÄ½øÒ»²½ÐÅÏ¢, Çë²Î¿¼ perlpod ÏßÉÏÎÄ¼þ.
  10
  11 =head1 NAME
  12
  13 perlcn - ¼òÌåÖÐÎÄ Perl Ö¸ÄÏ
  14
  15 =head1 DESCRIPTION
  16
  17 »¶ÓÀ´µ½ Perl µÄÌìµØ!
  18
  19 ´Ó 5.8.0 °æ¿ªÊ¼, Perl ¾ß±¸ÁËÍêÉÆµÄ Unicode (Í³Ò»Âë) Ö§Ô®,
  20 Ò²Á¬´øÖ§Ô®ÁËÐí¶àÀ¶¡ÓïÏµÒÔÍâµÄ±àÂë·½Ê½; CJK (ÖÐÈÕº«) ±ãÊÇÆäÖÐµÄÒ»²¿·Ý.
  21 Unicode ÊÇ¹ú¼ÊÐÔµÄ±ê×¼, ÊÔÍ¼º¸ÇÊÀ½çÉÏËùÓÐµÄ×Ö·û: Î÷·½ÊÀ½ç, ¶«·½ÊÀ½ç,
  22 ÒÔ¼°Á½Õß¼äµÄÒ»ÇÐ (Ï£À°ÎÄ, ÐðÀûÑÇÎÄ, ÑÇÀ²®ÎÄ, Ï£²®À´ÎÄ, Ó¡¶ÈÎÄ,
  23 Ó¡µØ°²ÎÄ, µÈµÈ). ËüÒ²ÈÝÄÉÁË¶àÖÖ×÷ÒµÏµÍ³ÓëÆ½Ì¨ (Èç PC ¼°Âó½ðËþ).
  24
  25 Perl ±¾ÉíÒÔ Unicode ½øÐÐ²Ù×÷. Õâ±íÊ¾ Perl ÄÚ²¿µÄ×Ö·û´®Êý¾Ý¿ÉÓÃ Unicode
  26 ±íÊ¾; Perl µÄº¯Ê½ÓëËã·û (ÀýÈçÕý¹æ±íÊ¾Ê½±È¶Ô) Ò²ÄÜ¶Ô Unicode ½øÐÐ²Ù×÷.
  27 ÔÚÊäÈë¼°Êä³öÊ±, ÎªÁË´¦ÀíÒÔ Unicode Ö®Ç°µÄ±àÂë·½Ê½´æ·ÅµÄÊý¾Ý, Perl
  28 Ìá¹©ÁË Encode Õâ¸öÄ£¿é, ¿ÉÒÔÈÃÄãÇáÒ×µØ¶ÁÈ¡¼°Ð´Èë¾ÉÓÐµÄ±àÂëÊý¾Ý.
  29
  30 Encode ÑÓÉìÄ£¿éÖ§Ô®ÏÂÁÐ¼òÌåÖÐÎÄµÄ±àÂë·½Ê½ ('gb2312' ±íÊ¾ 'euc-cn'):
  31
  32     euc-cn      Unix ÑÓÉì×Ö·û¼¯, Ò²¾ÍÊÇË×³ÆµÄ¹ú±êÂë
  33     gb2312-raw  Î´¾´¦ÀíµÄ (µÍ±ÈÌØ) GB2312 ×Ö·û±í
  34     gb12345     Î´¾´¦ÀíµÄÖÐ¹úÓÃ·±ÌåÖÐÎÄ±àÂë
  35     iso-ir-165  GB2312 + GB6345 + GB8565 + ÐÂÔö×Ö·û
  36     cp936       ×ÖÂëÒ³ 936, Ò²¿ÉÒÔÓÃ 'GBK' (À©³ä¹ú±êÂë) Ö¸Ã÷
  37     hz          7 ±ÈÌØÒÝ³öÊ½ GB2312 ±àÂë
  38
  39 ¾ÙÀýÀ´Ëµ, ½« EUC-CN ±àÂëµÄµµ°¸×ª³É Unicode, ìóÐè¼üÈëÏÂÁÐÖ¸Áî:
  40
  41     perl -Mencoding=euc-cn,STDOUT,utf8 -pe1 < file.euc-cn > file.utf8
  42
  43 Perl Ò²ÄÚ¸½ÁË "piconv", Ò»Ö§ÍêÈ«ÒÔ Perl Ð´³ÉµÄ×Ö·û×ª»»¹¤¾ß³ÌÐò, ÓÃ·¨ÈçÏÂ:
  44
  45     piconv -f euc-cn -t utf8 < file.euc-cn > file.utf8
  46     piconv -f utf8 -t euc-cn < file.utf8 > file.euc-cn
  47
  48 ÁíÍâ, ÀûÓÃ encoding Ä£¿é, Äã¿ÉÒÔÇáÒ×Ð´³öÒÔ×Ö·ûÎªµ¥Î»µÄ³ÌÐòÂë, ÈçÏÂËùÊ¾:
  49
  50     #!/usr/bin/env perl
  51     # Æô¶¯ euc-cn ×Ö´®½âÎö; ±ê×¼Êä³öÈë¼°±ê×¼´íÎó¶¼ÉèÎª euc-cn ±àÂë
  52     use encoding 'euc-cn', STDIN => 'euc-cn', STDOUT => 'euc-cn';
  53     print length("ÂæÍÕ");            #  2 (Ë«ÒýºÅ±íÊ¾×Ö·û)
  54     print length('ÂæÍÕ');            #  4 (µ¥ÒýºÅ±íÊ¾×Ö½Ú)
  55     print index("×»×»½Ì»å", "»×»½"); # -1 (²»°üº¬´Ë×Ó×Ö·û´®)
  56     print index('×»×»½Ì»å', '»×»½'); #  1 (´ÓµÚ¶þ¸ö×Ö½Ú¿ªÊ¼)
  57
  58 ÔÚ×îºóÒ»ÁÐÀý×ÓÀï, "×»" µÄµÚ¶þ¸ö×Ö½ÚÓë "×»" µÄµÚÒ»¸ö×Ö½Ú½áºÏ³É EUC-CN
  59 ÂëµÄ "»×"; "×»" µÄµÚ¶þ¸ö×Ö½ÚÔòÓë "½Ì" µÄµÚÒ»¸ö×Ö½Ú½áºÏ³É "»½".
  60 Õâ½â¾öÁËÒÔÇ° EUC-CN Âë±È¶Ô´¦ÀíÉÏ³£¼ûµÄÎÊÌâ.
  61
  62 =head2 ¶îÍâµÄÖÐÎÄ±àÂë
  63
  64 Èç¹ûÐèÒª¸ü¶àµÄÖÐÎÄ±àÂë, ¿ÉÒÔ´Ó CPAN (L<http://www.cpan.org/>) ÏÂÔØ
  65 Encode::HanExtra Ä£¿é. ËüÄ¿Ç°Ìá¹©ÏÂÁÐ±àÂë·½Ê½:
  66
  67     gb18030     À©³ä¹ýµÄ¹ú±êÂë, °üº¬·±ÌåÖÐÎÄ
  68
  69 ÁíÍâ, Encode::HanConvert Ä£¿éÔòÌá¹©ÁË¼ò·±×ª»»ÓÃµÄÁ½ÖÖ±àÂë:
  70
  71     big5-simp   Big5 ·±ÌåÖÐÎÄÓë Unicode ¼òÌåÖÐÎÄ»¥×ª
  72     gbk-trad    GBK ¼òÌåÖÐÎÄÓë Unicode ·±ÌåÖÐÎÄ»¥×ª
  73
  74 ÈôÏëÔÚ GBK Óë Big5 Ö®¼ä»¥×ª, Çë²Î¿¼¸ÃÄ£¿éÄÚ¸½µÄ b2g.pl Óë g2b.pl Á½Ö§³ÌÐò,
  75 »òÔÚ³ÌÐòÄÚÊ¹ÓÃÏÂÁÐÐ´·¨:
  76
  77     use Encode::HanConvert;
  78     $euc_cn = big5_to_gb($big5); # ´Ó Big5 ×ªÎª GBK
  79     $big5 = gb_to_big5($euc_cn); # ´Ó GBK ×ªÎª Big5
  80
  81 =head2 ½øÒ»²½µÄÐÅÏ¢
  82
  83 Çë²Î¿¼ Perl ÄÚ¸½µÄ´óÁ¿ËµÃ÷ÎÄ¼þ (²»ÐÒÈ«ÊÇÓÃÓ¢ÎÄÐ´µÄ), À´Ñ§Ï°¸ü¶à¹ØÓÚ
  84 Perl µÄÖªÊ¶, ÒÔ¼° Unicode µÄÊ¹ÓÃ·½Ê½. ²»¹ý, Íâ²¿µÄ×ÊÔ´Ïàµ±·á¸»:
  85
  86 =head2 Ìá¹© Perl ×ÊÔ´µÄÍøÖ·
  87
  88 =over 4
  89
  90 =item L<http://www.perl.com/>
  91
  92 Perl µÄÊ×Ò³ (ÓÉÅ·À³Àñ¹«Ë¾Î¬»¤)
  93
  94 =item L<http://www.cpan.org/>
  95
  96 Perl ×ÛºÏµä²ØÍø (Comprehensive Perl Archive Network)
  97
  98 =item L<http://lists.perl.org/>
  99
 100 Perl ÓÊµÝÂÛÌ³Ò»ÀÀ
 101
 102 =back
 103
 104 =head2 Ñ§Ï° Perl µÄÍøÖ·
 105
 106 =over 4
 107
 108 =item L<http://www.oreilly.com.cn/html/perl.html>
 109
 110 ¼òÌåÖÐÎÄ°æµÄÅ·À³Àñ Perl Êé½å
 111
 112 =back
 113
 114 =head2 Perl Ê¹ÓÃÕß¼¯»á
 115
 116 =over 4
 117
 118 =item L<http://www.pm.org/groups/asia.shtml#China>
 119
 120 ÖÐ¹ú Perl ÍÆ¹ã×éÒ»ÀÀ
 121
 122 =back
 123
 124 =head2 Unicode Ïà¹ØÍøÖ·
 125
 126 =over 4
 127
 128 =item L<http://www.unicode.org/>
 129
 130 Unicode Ñ§ÊõÑ§»á (Unicode ±ê×¼µÄÖÆ¶¨Õß)
 131
 132 =item L<http://www.cl.cam.ac.uk/%7Emgk25/unicode.html>
 133
 134 Unix/Linux ÉÏµÄ UTF-8 ¼° Unicode ´ð¿ÍÎÊ
 135
 136 =back
 137
 138 =head1 SEE ALSO
 139
 140 L<Encode>, L<Encode::CN>, L<encoding>, L<perluniintro>, L<perlunicode>
 141
 142 =head1 AUTHORS
 143
 144 Jarkko Hietaniemi E<lt>jhi@iki.fiE<gt>
 145
 146 Autrijus Tang (ÌÆ×Úºº) E<lt>autrijus@autrijus.orgE<gt>
 147
 148 =cut