加载中…
个人资料
wxwpxh
wxwpxh
  • 博客等级:
  • 博客积分:0
  • 博客访问:98,413
  • 关注人气:5
  • 获赠金笔:0支
  • 赠出金笔:0支
  • 荣誉徽章:
相关博文
推荐博文
正文 字体大小:

perl DBI 连接mysql(解决中文乱码问题)

(2014-10-28 23:33:14)
标签:

宠物

#!/usr/bin/perl
use encoding "utf-8";
use DBI;

$dbname="XXXX";
$user="XXXX";
$passwd="XXXX";

$dbh = DBI->connect("dbi:mysql:database=$dbname;host=127.0.0.1;port=3306",$user,$passwd) or die "can't connect to database ". DBI-errstr;
$dbh->do("SET NAMES utf8"); 
$sth=$dbh->prepare("select * from STUDENT");
$sth->execute;
while (@recs=$sth->fetchrow_array) {
print $recs[0].":".$recs[1].":".$recs[2]."\n";
}
$dbh->disconnect;

0

阅读 评论 收藏 转载 喜欢 打印举报/Report
  • 评论加载中,请稍候...
发评论

    发评论

    以上网友发言只代表其个人观点,不代表新浪网的观点或立场。

      

    新浪BLOG意见反馈留言板 电话:4000520066 提示音后按1键(按当地市话标准计费) 欢迎批评指正

    新浪简介 | About Sina | 广告服务 | 联系我们 | 招聘信息 | 网站律师 | SINA English | 会员注册 | 产品答疑

    新浪公司 版权所有