当前位置: 移动技术网 > IT编程>数据库>Mysql > 使用Perl DBI操作MySQL的一些建议

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

2017年12月12日  | 移动技术网IT编程  | 我要评论

使用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)');

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

 my $sth=$dbh->prepare("insert into wubx.weekevent values(?,?,?,?,?,?,?)");
 $sth->execute($oid,$cid,qq/$time/,$eventtype,qq/$cdesc/,$pid,$rflag);


对于字符串有可能是用户提交的用qq//包裹,减少特殊字符造成sql不能执行的情况.
3. 如果连接两个数据库有交换的操作或是迁数据,要考虑连连超时的情况.
 报错: 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时间设置太短.

如对本文有疑问, 点击进行留言回复!!

相关文章:

验证码:
移动技术网