使用Perl DBI操作MySQL的一些建议_Mysql

使用perl连接mysql，这个网上有很多案例了，一般大家都是DBI下的DBD::MySQL这个模块进行．这里做一个mask弄一个TIPS:
 Perl DBI MySQL的字符集为UTF8
 Perl DBI 特殊字符写入时报错
 Perl DBI 连接自动重连或是连接超时
 
１.　当MySQL的字符集是UTF8时需要引入：
 

use utf8;
binmode(STDOUT, ':encoding(utf8)');
binmode(STDIN, ':encoding(utf8)');
binmode(STDERR, ':encoding(utf8)');

目的:
解决perl连接mysql到数据后读取显示结果为乱码的问题．
 
２．对于特殊字符的写入，最好使用：

 my $sth=$dbh->prepare("insert into wubx.WeekEvent values(?,?,?,?,?,?,?)");
 $sth->execute($OId,$CId,qq/$Time/,$EventType,qq/$CDesc/,$PId,$RFlag);

对于字符串有可能是用户提交的用qq//包裹，减少特殊字符造成SQL不能执行的情况．
３.　如果连接两个数据库有交换的操作或是迁数据，要考虑连连超时的情况．
 报错：　MySQL server has gone away
　　处理办法：
  在DBD::mysql 4.012以后支持DBI连接的自动重连．需要设置：

 $dbh->{mysql_auto_reconnect} = 1;

  在早期的模块中不支持，简单的方法：
  

 $dbh->do('set SESSION wait_timeout=72000');
 $dbh->do('set SESSION interactive_timeout=72000')；

  此方法适用别的语言连MySQL连接短期丢失或是Server的timeout时间设置太短．

以上是小编为您精心准备的的内容，在的博客、问答、公众号、人物、课程等栏目也有的相关内容，欢迎继续使用右上角搜索按钮进行搜索mysql
perl dbi mysql、perl 操作mysql、perl dbi、perl dbi 安装、perl oracle dbi，以便于您获取更多的相关知识。