Beefy Boxes and Bandwidth Generously Provided by pair Networks
go ahead... be a heretic
 
PerlMonks  

Re: Data::Dumper and utf8

by Krambambuli (Deacon)
on Jan 30, 2010 at 08:43 UTC ( #820469=note: print w/ replies, xml ) Need Help??


in reply to Data::Dumper and utf8

Although I'm not really sure why, the following code change seems to work:

#!/usr/bin/perl use strict; use warnings; use utf8; use Encode; use Data::Dumper; #$Data::Dumper::Useqq = 1; binmode STDOUT, 'utf8'; our $VAR1; my $data = ''; # this is a non-ACII a Umlaut my $dump = Dumper( encode( 'utf8', $data ) ); print $dump, "\n"; eval $dump; print $dump, "\n"; if ( $data eq $VAR1 ) { print " == equal\n"; } else { print " != not equal\n"; } #print Dumper( $VAR1 ), "\n"; print "Data: $data\nVAR1: $VAR1\n"; print "original is utf8 = '" . utf8::is_utf8( $data ) . "'\n"; print "restored is utf8 = '" . utf8::is_utf8( $VAR1 ) . "'\n";
It's Dumper that generates the problems, not the eval:

$VAR1 = "\x{e4}";

has no way to determine that there's something utf8-related in the string.

Update: There's some additional info available here.

Update2: Looks like the proper solution is actually to just set

$Data::Dumper::Useperl = 1;
According to the doc, you just have to use a Perl newer than 5.8.0 to have this working - it does work for me, Perl 5.10.0.

Krambambuli
---


Comment on Re: Data::Dumper and utf8
Select or Download Code
Re^2: Data::Dumper and utf8
by thedi (Acolyte) on Jan 30, 2010 at 12:21 UTC

    Replacing method Data::Dumper::qquote as suggested in the additional info did it for me. Many thanks.

    Perl is great - but the best thing about Perl is its monks!

    regards

    Thedi

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://820469]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others scrutinizing the Monastery: (5)
As of 2014-09-19 10:18 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    How do you remember the number of days in each month?











    Results (135 votes), past polls