> 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"?
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
