diff options
| author | Audrey Tang <cpan@audreyt.org> | 2002-07-25 15:05:11 +0800 |
|---|---|---|
| committer | hv <hv@crypt.org> | 2002-08-08 14:20:05 +0000 |
| commit | 1d587bbdc2f23329b3310bad2acc3bd3b8a99c29 (patch) | |
| tree | 6bf6b008165defcece2be6f5d3e5101106744ded /README.jp | |
| parent | 98c7bfd488ae0b104d3bdd0c2f363b258374696b (diff) | |
| download | perl-1d587bbdc2f23329b3310bad2acc3bd3b8a99c29.tar.gz | |
README.jp and README.cn
Message-id: <20020724230511.GA1327@not.autrijus.org>
p4raw-id: //depot/perl@17692
Diffstat (limited to 'README.jp')
| -rw-r--r-- | README.jp | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -78,7 +78,7 @@ Perl5.8¤Ç¤Ï¡¢¤³¤ì¤é¤Îµ¡Ç½¤¬¤¹¤Ù¤ÆPerlËÜÂΤÀ¤±¤Ç¼Â¸½¤Ç¤¤ë¾å¤Ë¡¢ÆüËܸì¤Î¤ß¤Ê¤é¤º¾ # jcode.pl require "jcode.pl"; while(<>){ - jcode::convert(*_, 'euc', 'sjis); + jcode::convert(*_, 'euc', 'sjis'); print; } # Jcode.pm @@ -93,7 +93,7 @@ Perl5.8¤Ç¤Ï¡¢¤³¤ì¤é¤Îµ¡Ç½¤¬¤¹¤Ù¤ÆPerlËÜÂΤÀ¤±¤Ç¼Â¸½¤Ç¤¤ë¾å¤Ë¡¢ÆüËܸì¤Î¤ß¤Ê¤é¤º¾ print; } # Perl 5.8 - encoding ¤òÍøÍѤ·¤Æ - use encoding 'euc-jp', STDIN=>'shiftjis' + use encoding 'euc-jp', STDIN => 'shiftjis'; while(<>){ print; } |