Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw
 
PerlMonks  

Re: PerlIO: crlf layer on Windows interfering with UCS-2 unicode

by ikegami (Patriarch)
on Feb 15, 2010 at 06:43 UTC ( [id://823228] : note . print w/replies, xml ) Need Help??


in reply to PerlIO: crlf layer on Windows interfering with UCS-2 unicode

Note that your proposed solution disables buffering. Replace

open my $fh, ">:raw:encoding(ucs-2le):crlf:utf8", $qfn

with

open my $fh, ">:raw:perlio:encoding(ucs-2le):crlf:utf8", $qfn

to support buffering.

Also, there doesn't appear to be a need to specify :utf8, so all you need is

open my $fh, ">:raw:perlio:encoding(ucs-2le):crlf", $qfn