One obvious place to look for PerlIO implementations.

[perl5.git] / README.jp

diff --git a/README.jp b/README.jp
index 8fd4dcf..8f58535 100644 (file)
--- a/README.jp
+++ b/README.jp
@@ -78,7 +78,7 @@ Perl5.8
   # jcode.pl
   require "jcode.pl";
   while(<>){
-    jcode::convert(*_, 'euc', 'sjis);
+    jcode::convert(*_, 'euc', 'sjis');
     print;
   }
   # Jcode.pm
@@ -93,7 +93,7 @@ Perl5.8
     print;
   }
   # Perl 5.8 - encoding ¤òÍøÍѤ·¤Æ
-  use encoding 'euc-jp', STDIN=>'shiftjis'
+  use encoding 'euc-jp', STDIN => 'shiftjis';
   while(<>){
        print;
   }