Fix typo in TestInit and revert workaround.

[perl5.git] / README.jp

diff --git a/README.jp b/README.jp
index 8fd4dcf..579c8ad 100644 (file)
--- a/README.jp
+++ b/README.jp
@@ -4,6 +4,8 @@ specially designed to be readable as is.
 
 The following documentation is written in euc-jp encoding.
 
+=encoding euc-jp
+
 =head1 NAME
 
 perljp - ÆüËܸì Perl ¥¬¥¤¥É
@@ -78,7 +80,7 @@ Perl5.8
   # jcode.pl
   require "jcode.pl";
   while(<>){
-    jcode::convert(*_, 'euc', 'sjis);
+    jcode::convert(*_, 'euc', 'sjis');
     print;
   }
   # Jcode.pm
@@ -93,7 +95,7 @@ Perl5.8
     print;
   }
   # Perl 5.8 - encoding ¤òÍøÍѤ·¤Æ
-  use encoding 'euc-jp', STDIN=>'shiftjis'
+  use encoding 'euc-jp', STDIN => 'shiftjis';
   while(<>){
        print;
   }
@@ -160,7 +162,7 @@ O'Reilly 
 
 =over 4
 
-=item L<http://www.pm.org/groups/asia.shtml#China>
+=item L<http://www.pm.org/groups/asia.html>
 
 Ãæ¹ñ¡ÊÃæ²Ú¿Í̱¶¦Ï¹ñ¡Ë