Perlについての質問箱 49箱目
■ このスレッドは過去ログ倉庫に格納されています
0668デフォルトの名無しさん
2011/12/27(火) 16:21:59.06なぜか文字化けするのですがどうしたらなおりますか?
#!/usr/bin/perl
# ソースコードはutf8で書かれています
use utf8;
binmode STDIN, ":utf8";
binmode STDOUT, ":utf8";
use strict;
use warnings;
print " ここでは文字化けしない";
open (IN, "<./in.txt"); # in.txtはUTF8
while(<IN>){
print $_; #なぜか文字化け
}
close IN;
■ このスレッドは過去ログ倉庫に格納されています