WindowsはPowerShellを使ってもUTF-8が使えないのか…という諦め
· 1 min read
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