环境：ActivePerl-5.12.2.1202-MSWin32-x86-293621

我机器上有oracle和mysql，用ppm自动安装以后，可以连接oracle，我想手动连接上mysql，于是下载了DBD-mysql-4.018。

然后把里面的：F:\lib\perl\DBD-mysql-4.018\lib\DBD\mysql.pm和F:\lib\perl\DBD-mysql-4.018\lib\DBD\mysql拷贝到了perl的安装目录下面：F:\Program Files\perl\lib\DBD。

测试代码：

unshift(@INC,'F:\Program Files\perl\lib');

unshift(@INC,'F:\Program Files\perl\lib\DBD');

unshift(@INC,'F:\Program Files\perl\lib\DBD\mysql');

use DBI;

#连接数据库mydata

#my $dbh = DBI->connect('dbi:Oracle:orcl','xjs','xjs') or die "无法连接数据库: " . DBI->errstr;

my $dbh = DBI->connect('dbi:mysql:test','root','admin') or die "无法连接数据库: " . DBI->errstr;

好像是找不到：DBD:mysql，不知道什么原因？

错误信息：

F:\code-perl>perl db.pl

install_driver(mysql) failed: Can't locate loadable object for module DBD::mysql

in @INC (@INC contains: F:/Program Files/perl/lib/DBD/mysql F:/Program Files/pe

rl/lib/DBD d:\oracle\product\10.2.0\db_1\perl\5.8.3\lib\MSWin32-x86 d:\oracle\pr

oduct\10.2.0\db_1\perl\5.8.3\lib d:\oracle\product\10.2.0\db_1\perl\5.8.3\lib\MS

Win32-x86 d:\oracle\product\10.2.0\db_1\perl\site\5.8.3 d:\oracle\product\10.2.0

\db_1\perl\site\5.8.3\lib d:\oracle\product\10.2.0\db_1\sysman\admin\scripts d:\

oracle\product\10.2.0\db_1\perl\lib\5.8.3\MSWin32-x86 d:\oracle\product\10.2.0\d

b_1\perl\lib\5.8.3 d:\oracle\product\10.2.0\db_1\perl\5.8.3\lib\MSWin32-x86-mult

i-thread d:\oracle\product\10.2.0\db_1\perl\site\5.8.3 d:\oracle\product\10.2.0\

db_1\perl\site\5.8.3\lib d:\oracle\product\10.2.0\db_1\sysman\admin\scripts F:/P

rogram Files/perl/site/lib F:/Program Files/perl/lib .) at (eval 5) line 3

Compilation failed in require at (eval 5) line 3.

Perhaps a module that DBD::mysql requires hasn't been fully installed

at db.pl line 9

作者: goldenfish1919

发布时间: 2010-12-16