WindowsはPowerShellを使ってもUTF-8が使えないのか…という諦め

1
2
3
4
use Encode;
use Term::Encoding qw(term_encoding);
my $enc = Encode::find_encoding(term_encoding);
print $enc->encode("ハローワールド!");
1
2
3
binmode STDIN  => ':encoding(shiftjis)';
binmode STDOUT => ':encoding(shiftjis)';
binmode STDERR => ':encoding(shiftjis)';

Comments

comments powered by Disqus