+ -
当前位置:首页 → 问答吧 → perl如何连接mysql数据库?

perl如何连接mysql数据库?

时间:2010-12-16

来源:互联网

环境: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

你的安装方式不对。手动拷几个文件肯定不够了。ppm不能自动安装吗?

作者: iambic   发布时间: 2010-12-16