How can I handle unicode with Perl's DBI?

perl unicode dbi
edelwater picture edelwater · Jun 11, 2009 · Viewed 26k times · Source

My delicious-to-wp perl script works but gives for all "weird" characters even weirder output. So I tried 

$description = decode_utf8( $description );

but that doesnt make a difference. I would like e.g. “go live” to become “go live” and not “go live†How can I handle unicode in Perl so that this works?

UPDATE: I found the problem was to set utf of DBI I had to set in Perl:

my $sql = qq{SET NAMES 'utf8';};
$dbh->do($sql);

That was the part that I had to set, tricky. Thanks!

Answer

Penfold picture Penfold · Jun 12, 2009

It's worth noting that if you're running a version of DBD::mysql new enough (3.0008 on), you can do the following: $dbh->{'mysql_enable_utf8'} = 1; and then everything's decode()ed/encode()ed for you on the way out from/in to DBI.

Related questions

How can I output UTF-8 from Perl?

I am trying to write a Perl script using the "utf8" pragma, and I'm getting unexpected results. I'm using Mac OS X 10.5 (Leopard), and I'm editing with TextMate. All of my settings for both my editor and operating system are …

Read More
Why does modern Perl avoid UTF-8 by default?

I wonder why most modern solutions built using Perl don't enable UTF-8 by default. I understand there are many legacy problems for core Perl scripts, where it may break things. But, from my point of view, in the 21st century, …

Read More
Use of 'use utf8;' gives me 'Wide character in print'

If I run the following Perl program: perl -e 'use utf8; print "鸡\n";' I get this warning: Wide character in print at -e line 1. If I run this Perl program: perl -e 'print "鸡\n";' I do not get …

Read More