Perl中DBI、DBD::mysql模块的安装和可能出现的错误解决方法

使用的软件版本

DBI-1.604.tar.gz
dbd-mysql-4.006.tar.gz
建议使用以上

版本搭配，否则可能连接MysqL错误
一、DBI的安装
 wget http://www.cpan.org/modules/by-module/DBD/DBI-1.604.tar.gz
 tar -zxvf DBI-1.604.tar.gz
 cd DBI-1.604
 perl Makefile.PL
 make
 make test
 make install

 

 
二、DBD的安装
 
 注意MysqL的环境变量，若没有则用 添加/usr/local/MysqL/bin到环境变量PATH中
 PATH=/usr/local/MysqL/bin:$PATH;
 export PATH (MysqL的安装路径根据实际情况填写)
 
  wget http://cpan.perl.org/modules/by-module/DBI/DBI-1.601.tar.gz
 tar -zxvf dbd-mysql-4.006.tar.gz
 cd dbd-mysql-4.006
 perl Makefile.PL –MysqL_config=/usr/local/MysqL/bin/MysqL_config
 make
 make test
 make install
 

 

三、其它可能发生的状况

如果运行某个调用MysqL数据库的程序时出现如下系统提示：
install_driver(MysqL) Failed: Can't load '/usr/lib/perl5/site_perl/5.6.1/i386-linux/auto/DBD/MysqL/MysqL.so' for module DBD::MysqL: /usr/lib/perl5/site_perl/5.6.1/i386-linux/auto/DBD/MysqL/MysqL.so: undefined symbol: uncompress at /usr/lib/perl5/5.6.1/i386-linux/DynaLoader.pm line 206. at (eval 2) line 3
那么说明DBD::MysqL未安装成功。
此时将/usr/local/MysqL/include/MysqL/*
复制到/usr/include/
同时将/usr/local/MysqL/lib/MysqL/*
复制到/usr/lib/(64位系统 /usr/lib64/)
然后使用perl Makefile.PL设置环境，再进行后续的正常安装，就能正确连接到MysqL数据库。

 

 

四、连接代码示例，下面是perl通过DBI连接到MysqL数据库的示例代码:

 

#!/bin/perl

use DBI;

# Connect to target DB
my $dbh = DBI->connect("DBI:MysqL:database=linuxpig;host=localhost","your_username","your_password",{'raiseerror' => 1});

# Insert one row
my $rows = $dbh->do("INSERT INTO test (id,name) VALUES (1,'welcome to linuxpig.com')");

# query
my $sqr = $dbh->prepare("SELECT name FROM test");
$sqr->execute();

while(my $ref = $sqr->fetchrow_hashref()) {
print "$ref->{'name'}\n";
}

$dbh->disconnect();

执行结果:

[root@linuxpig ~]# perl test.pl

 

 

五、其他安装方法：

使用CPAN shell,以root身份登陆，然后发出如下命令： #perl -MCPAN -e shell cpan>install DBI cpan>install DBD::MysqL cpan>install CGI