Hello.
I think it is correct.
On EBCDIC platforms, perl uses UTF-EBCDIC instead of UTF-8,
nevertheless perl calls it "utf8."
In general chr(0xFF) (equals to "\xFF") in EBCDIC encodings
corresponds to U+009F, that is a single-octet control character;
thus a single octet sequence "\xFF" is well-form in UTF-EBCDIC too.
If you want to convert an interger to a character according to
Unicode scalar values, you can use pack('U'), but not chr().
For example, pack('U', 0xFF) should correspond to U+00FF
(y with diaeresis), everywhere (both on ASCII and on EBCDIC).
Regards,
SADAHIRO Tomoyuki
Hi,
This are the tetstcase i'm runing on EBCDIC platform,
my $b = chr(0x0FF);
$p=utf8::upgrade($b);
print "\n$p";
utf8::upgarde returns the number of octets necessary
to represent the string as UTF-X.
EBCDIC output is 1 whereas ASCII platform output is 2.
Is the return value i'm getting on EBCDIC is correct?
my $c=chr(0x0FF);
print "before $c\n";
print "\n";
utf8::encode($c);
print "after $c\n";
print length($c);
On ASCII before is single octet repsentation and after
encode is two byte , length is 2.
On EBCDIC it is single before and after encode and
length is 1.
Is this correct on EBCDIC or is it a bug in code for
EBCDIC ?
utf::is_utf8 test whether STRING is in UTF-8, so 0x0FF
is UTF-8 on EBCDIC?
