无法使用Net-MySQL模块

godsad

用sniffer看到程序和数据库通信了,可就是数据库没反应,求解

不会是因为官网cpan文档里的错别字造成的吧,官网文档里好多错别字,痛苦死我了

1. 
   
2. #!/usr/bin/perl
   
3. use warnings;
   
4. use strict;
   
5. use Net::MySQL;
   
6. 
   
7. my $mysql = Net::MySQL->new(
   
8.             hostname => 'localhost',
   
9.             database => 'accounts',
   
10.             user => 'root',
    
11.             password => 'firstsky');
    
12. $mysql->query(q{
    
13.         insert into sky_accout (sky_pid, sky_holdUserId, sky_comment) values (2, '2', '火星人专用账号')});
    
14. $mysql->close;
    

复制代码

[ 本帖最后由 godsad 于 2009-10-13 15:29 编辑 ]

兰花仙子

我曾经看过一阵这个模块的代码。
个人觉得：你还是用DBI和DBD::mysql比较好，这也是perl操作DB的标准做法。

godsad

同一个人的作品吧,感觉Net::MySQL更清晰,作者也有意用它做终结者...

[ 本帖最后由 godsad 于 2009-10-13 15:59 编辑 ]

兰花仙子

Net::Mysql是一个日本人写的，纯perl的数据库接口。
DBI是Tim Bunce写的，DBI的Mysql驱动DBD::mysql是用C写port到Perl的。

godsad

哦...
http://search.cpan.org/~oyama/Net-MySQL-0.09/MySQL.pm
http://search.cpan.org/dist/DBD-mysqlPP-0.04/mysqlPP.pm
这两个模块文档的照片一样,我还以为是同一个人...

godsad

用了dbi+dbd::mysql成功操作数据库,但是中文插入进去变乱码.
数据库用的是utf-8的字符集...又发现mysql配置文件默认编码是gb2315
代码如下

1. 
   
2. #!/usr/bin/perl
   
3. use warnings;
   
4. use strict;
   
5. use DBI;
   
6. 
   
7. my $dbh = DBI->connect("DBI:mysql:database=accountuser;host=localhost","root","firstsky");
   
8. $dbh->{'mysql_enable_utf8'}=1;
   
9. $dbh->do ("insert into sky_account values (2,'2','火星人专用账号')");
   
10. $dbh->disconnect();
    

复制代码

[ 本帖最后由 godsad 于 2009-10-13 17:36 编辑 ]

兰花仙子

原帖由 godsad 于 2009-10-13 16:40 发表
用了dbi+dbd::mysql成功操作数据库,但是中文插入进去变乱码.
数据库用的是utf-8的字符集
代码如下

#!/usr/bin/perl
use warnings;
use strict;
use DBI;

my $dbh = DBI->connect("DBI:mysql:databas ...

你要先把字符转成utf8的再插入utf-8的表.
use Encode;

godsad

是Encodings::CN::Utility这个模块吗?总是安装不了

兰花仙子

原帖由 godsad 于 2009-10-13 17:53 发表
是Encodings::CN::Utility这个模块吗?总是安装不了

see this:
http://bbs3.chinaunix.net/viewthread.php?tid=711103