作者: dune
日時: 2009/5/16(01:45)
泥造です。覚え書き。

改行しない場合は binmode 関係ないはず、と思ったら大間違い。
0x0A を含む文字(「上」とか)も化けてしまう。

%tconv utf-8 Shift_JIS test1.pl
use strict;
use utf8;
my $file = "text.utf32be";
open(FILE, ">encoding(UTF-32BE)", $file) or die;
print FILE "上"; # "\x00\x00\x4E\x0A"
close FILE;

%perl test1.pl & dump -h text.utf32be
00000000  00 00 4E 0D 0A         -

%tconv utf-8 Shift_JIS test2.pl
use strict;
use utf8;
my $file = "text.utf32be";
open(FILE, ">:raw:encoding(UTF-32BE):crlf", $file) or die;
print FILE "上"; # "\x00\x00\x4E\x0A"
close FILE;

%perl test2.pl & dump -h text.utf32be
00000000  00 00 4E 0A            -

%
-- 
泥造 FZH01112@...