On Tue, 28 Mar 2006, Paul Sobey wrote:
> open OUT, ">:raw:encoding(UTF-16LE):crlf", "$newout"
>
> for output, Windows then likes you to add a byte order mark (BOM) before
> any other data, as follows:
>
> print OUT "\x{feff}";
>
> It throws a warning when printing that character - no idea how to
> suppress it
You have to switch the Unicode bit on the crlf on to get rid of the warnings:
open OUT, ">:raw:encoding(UTF-16LE):crlf:utf8", "$newout" or die;
I agree that this is unintuitive; I only figured it out after looking at the
PerlIO layer sources...
Cheers,
-Jan
_______________________________________________
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
