(test draft snipped)
> I have replace test cases 25 - 28 with the ones listed above. And the
> results were as follows:
>
> /defects/brian/unicode/Unicode-Transform-0.20:>make test
> PERL_DL_NONLAZY=1 /defects/brian/nonthreaded/perl-5.8.0/perl
> "-I/defects/brian/n
> onthreaded/perl-5.8.0/lib"
>### TESTS START
>$utf8_fe7f_upgraded = ord("A") != 0x41
>? pack('U*', 213, 190, 215) # EBCDIC "\xef\xb9\xbf"
>: pack('U*', 239, 185, 191); # ASCII "\xef\xb9\xbf"
>
>$utf8_fe7f_bytes = pack('C*', 239, 185, 191);
>
>print "\x{fe7f}" eq utf8_to_unicode($utf8_fe7f_upgraded)
>? "ok" : "not ok", " 25\
Thank you.
I want to know what UTF8-flag-on string (SvUTF8(sv) is true)
is equivalent with "\xef\xb9\xbf",
but I would misunderstand usage of pack('U*', LIST).
Are numbers < 256 in LIST
Unicode code points or native ASCII/EBCDIC code points?
Here is a draft of tests 25..28.
I guess this should s
>Thank you for your report.
>
>I was careless about the trap on a non-ASCII platform
>like that ("a" eq "\x61") is not true.
>
>So the failed tests are fixed, and some tests are added.
>Ver. 0.20 is available from there:
>
>[TAR-GZ, HTML-ized POD]
>http://homepage1.nifty.com/nomenclator/perl/Unicod
Thank you for your report.
I was careless about the trap on a non-ASCII platform
like that ("a" eq "\x61") is not true.
So the failed tests are fixed, and some tests are added.
Ver. 0.20 is available from there:
[TAR-GZ, HTML-ized POD]
http://homepage1.nifty.com/nomenclator/perl/Unicode-Transfo
>> Hello,
>>
>> I am trying to work out the easiest way that I can coax perl to covert
>> text from UTF-EBCDIC to UTF-8 and back. If anyone can provide some clue
>> that would be greatly appreciated.
>>
>> Brian
>
>Still preliminary edition...
>
>http://homepage1.nifty.com/nomenclator/perl/Unicode-
> Hello,
>
> I am trying to work out the easiest way that I can coax perl to covert
> text from UTF-EBCDIC to UTF-8 and back. If anyone can provide some clue
> that would be greatly appreciated.
>
> Brian
Still preliminary edition...
http://homepage1.nifty.com/nomenclator/perl/Unicode-Transf
Hello,
I am trying to work out the easiest way that I can coax perl to covert
text from UTF-EBCDIC to UTF-8 and back. If anyone can provide some clue
that would be greatly appreciated.
Brian
