I am running perl 5.8.6 on z/OS unix. I am doing these :
$u = unpack"U0U", "\x8a\x73"; print "\n\$u : $u";
$p = pack("U0U", $u); print "\n\$p : $p";
Are you running with strict and warnings turned on? Because I'm getting "Malformed UTF-8 character" messages running this:
#!/usr/bin/perl use strict; use warnings;
my $u = unpack"U0U", "\x8a\x73"; print "\$u: $u\n";
my $p = pack("U0U", $u);
print "\$p: $p\n";And I can get rid of those errors by changing the pack/unpack template to "UU" or "U*"... What are you trying to accomplish with "U0U"?
I figured that the malformed character error that you mentioned, doesnt show up on z/OS while using 'U0U'. This is even if I run the same with 'use strict' and 'use warnings'.
Also, the U0U indicates that the string of bytes passed to unpack has to be strictly in utf-8 unicode.
Are you running the same on z/OS unix ? I am running this on z/OS v1R4.
Thanks, Rajarshi.
_________________________________________________________________
News, views and gossip. http://www.msn.co.in/Cinema/ Get it all at MSN Cinema!
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>
