Jan Dubois wrote:
Files opened on Windows already have the :crlf layer pushed by default,
so you somehow need to get the :encoding layer*below* it.
Is it possible to re-write the working statement
open(my $fh, ">:raw:encoding(UTF-16LE):crlf", $filename) or die $!;
in a way that works
On 2005-07-07 06:27:04 PM Rafael Garcia-Suarez wrote:
>This is fixed in the development branch of perl (5.9.x).
>Something probably goes wrong with the localisation of UTF-8 magic.
>The next 5.8.x release may have this bug fixed.
OK, I've crafted the following module that seems to work as a patc
ck('C', 200): is_utf8=" . (utf8::is_utf8($s) ? 'yes' : 'no ').
"\t$s\t" . join(',', unpack('C*', $s)) . "\n";
The failure (as below) occurs on Windows, Linux, and OSX.
Bob
On 2005-07-06 03:43:50 PM "Bob Hallis
Am I doing something wrong or is this a bug:
use strict;
my $p;
foreach $p (qw (C U C))
{
my $s = pack($p, 200);
print "pack('$p', 200): is_utf8=" . (utf8::is_utf8($s) ? 'yes' : 'no ')
. "\t$s\t" . join(',', unpack('C*', $s)) . "\n";
}
Generates the following output:
pack('C', 200): is_ut
On 02/12/2004 14:25:27 Tim Bunce wrote:
>Isn't there a standard name for the 'unrestricted' encoding?
>(Might be an IETF RFC rather than a unicode standard.)
Are you thinking of CESU-8 (see Unicode Technical Report #26 at
http://www.unicode.org/reports/tr26/). This is similar to Perl's UTF-8 in
