Perlの勉強をしようと思ったら、最初から文字化

スポンサーリンク

Active Perl  V5.16.2

Snap_2013-1-31_14-58-8

◯ 治す方法を勉強しなければ

ようやく、文字化無しで表示されました

Snap_2013-2-2_15-7-24

use Encode;
use strict;
use warnings;
use utf8;
binmode STDIN,  ":encoding(cp932)";
binmode STDOUT, ":encoding(cp932)";

 
# ファイル入出力
 
#open(my $in, "<", "test.dat") or die("could not open file.");
open(my $in, "<:utf8", "test.dat") or die("could not open file.");
 
while (<$in>) {
    print $_;
}
 
close($in);

◯ 正しいかどうかわかりませんが、間違いなく表示されました。

ファイルを読み込むとき、UTF8を指定しないとダメみたいです。

最大のミスは utf-8 ではなく utf8 です。HTMLのつもりで書いていたら、マイナス必要なし。

■ コマンドプロンプトの文字コードを確認するには

Snap_2013-2-2_16-30-32

>chcp と打ち込みます。

 

 

コメント

タイトルとURLをコピーしました