perl UTF-16LE로 출력하기

해본 것/팁과 정보 2010.01.06 13:54 posted by 이밋
올바른 방법은 아직 모르겠는데...

일단 내가 사용하고 있는 방법은 다음과 같다.

open($out, ">:raw:encoding(UTF-16LE)", $outFileName) || die "cannot open $outFileName";
print $out "\x{FEFF}"; # write UTF-16LE BOM
print $out "TEST\n";
close($out);

Perl Unicode(ANSI, utf-8, utf-16LE, ...) 부분은 뭔가 알듯 말듯 모호하네...