cygwin上でperlをつかって日本語処理しようとしているが、utf8がなかなかうまく処理できない。本日の練習ではutf-8Nでコードを書いて、
#!/usr/bin/perl
use utf8;
#use open ":locale";
#use open ":std";
#use strict;
use Encode;
my $str = "漢字をstdoutに出力してみる\n";
print Encode::encode('utf8',$str) . "\n"; # *
print length($str). "\n";
exit 0;
ぐらいにすると、
漢字をstdoutに出力してみる
17
の結果が出るようになった。