perl-unicode

Re: encoding(UTF16-LE) on Windows

2011-01-19 13:44:32
Jan Dubois schrieb am 19.01.2011 um 11:08 (-0800):

You need to stack the I/O layers in the right order.  The :encoding()
layer needs to come last (be at the bottom of the stack), *after* the
:crlf layer adds the additional carriage returns.  The way to pop the
default :crlf layer is to start out with the :raw pseudo-layer:

  open(my $fh, ">:raw:encoding(UTF-16LE):crlf", $filename) or die $!;

Cool, that works. thanks! :-)

-- 
Michael Ludwig