X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/e6f03d268116532cf99f1fc3fe20dcc057c9f0c5..bb7a0f5422600fd7de7806825a1300a577b7e61f:/README.jp?ds=sidebyside diff --git a/README.jp b/README.jp index 8fd4dcf..8f58535 100644 --- 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; }