使用Perl DBI操作MySQL的一些建议_MySQL
使用perl连接mysql,这个网上有很多案例了,一般大家都是DBI下的DBD::MySQL这个模块进行.这里做一个mask弄一个TIPS: Perl DBI MySQL的字符集为UTF8 Perl DBI 特殊字符写入时报错 Perl DBI 连接自动重连或是连接超时 1. 当MySQL的字符集是UTF8时需要引入: use utf8;binmode(STDOUT, ':encoding(utf8)');binmode(STDIN, ':encoding(utf8)');binmode(STDERR, ':encoding(utf8)'); 目的: my $sth=$dbh->prepare("insert into wubx.WeekEvent values(?,?,?,?,?,?,?)"); $sth->execute($OId,$CId,qq/$Time/,$EventType,qq/$CDesc/,$PId,$RFlag);
$dbh->{mysql_auto_reconnect} = 1; 在早期的模块中不支持,简单的方法: $dbh->do('set SESSION wait_timeout=72000'); $dbh->do('set SESSION interactive_timeout=72000'); 此方法适用别的语言连MySQL连接短期丢失或是Server的timeout时间设置太短. |