关于安装perl dbd-mysql的问题

feiyond 2009-01-12 03:24:33

以下是我看到的遇到同样的问题的帖子,请大家帮忙解决一下

我写了一个测试代码,想连接mysql数据库,代码见下面:
use DBI;
use strict;

my $dsn = "DBI:mysql:forum:localhost";

my $user = "root";

my $pass = "password";

my($dbh,$sth);

my(@ary);

$dbh = DBI->connect($dsn,$user,$pass,{ RaiseError => 1 });

$sth = $dbh->prepare("select username,message_content from message");

$sth->execute();

while(@ary = $sth->fetchrow_array()){
print join("\t",@ary),"\n";
}

$sth->finish();

$dbh->disconnect();

cmd下运行出现提示错误,
D:\Perl>perl bigint.pl
install_driver(mysql) failed: Can't locate loadable object for module DBD::mysql
in @INC (@INC contains: D:/Perl/site/lib D:/Perl/lib .) at (eval 4) line 3
Compilation failed in require at (eval 4) line 3.
Perhaps a module that DBD::mysql requires hasn't been fully installed
at bigint.pl line 16

说DBD的mysql模块没有安装,我用PPM下载了DBD-mysqlpp 和Net-Mysql安装了再运行提示还是出错,
请问应该安装哪个模块.
另外,我在CAPN上下载了一个DBD-mysql-4.006,里面有源代码,还有一个DBD文件夹,里面有mysql文件夹和mysql.pm,也不知道该放在哪里.

...全文