Even when the Filehandle is opened in utf8 mode this is not working. I can see the UTF8 flag is active with the pack conversion (this was the only mechanism that allow me to activate the flag, the other approaches doesn't seem to work i.e. decode utf8). I already tried : use bytes, use utf8 but nothing works. Any help will be highly appreciated ! Cheers PerlMonks ! Inguanzo$SourceHash->{$order_value} = $import_StringTable_xp_node->findvalue( +"value[\@language!=\"English\"]/text"); print XML_DIFF_FH $SourceHash->{$order_value} . "\n"; $SourceHash->{$order_value} = pack ("U*", unpack("C*", $SourceHash->{$ +order_value})); print XML_DIFF_FH $SourceHash->{$order_value} . "\n"; print STDERR Encode::is_utf8($SourceHash->{$order_value})?"1":"0";
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |