カテゴリー
MySQL

DBIでMysql を使う時の文字コード指定

接続時

my $dbh = DBI->connect(
'DBI:mysql:database=sandbox;host=localhost;mysql_read_default_file=/etc/mysql/my.cnf',
qw/id password/,
);

または接続後に

$dbh->{ mysql_enable_utf8 } = 1;


この辺の記事
http://www.geminium.com/chiba_blog/2009/02/

カテゴリー
perl

eval{}; 中のreturn(); に注意

例えば

sub xxx{
eval{
my $a=1;
if($a){return(0);}
};
}

if(&xxx){print"abc";}
else{print"def";}

などとするとうまくいかない。

sub xxx{
eval{
my $a=1;
if($a){die;}
};
if($@){return(0);}
}

などとしよう。