哪里可以下到DBD/oracle.pm的包

哪里可以下到DBD/oracle.pm的包

我现在写了个程序需要连接oracle数据库,创建一张表,插入点数据。
我已经安装了DBI模块了,但是程序执行的时候总报DBD/ORACL.PM的错误。
install_driver(Oracle) failed: Can't locate DBD/Oracle.pm in @INC (@INC contains
: D:/Perl/site/lib D:/Perl/lib .) at (eval 2) line 3.
Perhaps the DBD::Oracle perl module hasn't been fully installed,
or perhaps the capitalisation of 'Oracle' isn't right.
Available drivers: DBM, ExampleP, File, Gofer, Proxy, SQLite.

程序如下:

use DBI;
my $db_name="ultranms";
my $db_server="ultranms";
my $user="ultranms";
my $pass="ultranms";

my $connetc_str="dbi:Oracledatabase@$db_server";
my $db_hdl = DBI->connect($connetc_str,$user,$pass);

if(!db_hdl){
        print "connect db error!!!\n";
        }
print "connect db success~~";
$db_hdl->do("DROP TABLE IF EXISTS test";
$db_hdl->do("CREATE TABLE test (a int,b int)";

$db_hdl->do("INSERT INTO test (a) VALUES ($_)", undef)     for 1..100;
#$dbh->do("INSERT INTO ex_profile (a) VALUES (?)",  undef, $_) for 1..100;

my $select_sql = "SELECT a FROM test";

$db_hdl->selectall_arrayref($select_sql);

$db_hdl->selectall_hashref($select_sql, 'a');

my $sth = $db_hdl->prepare($select_sql);
$sth->execute;
while ( @row = $sth->fetchrow_array ) {
}


__DATA__
cpan
哈哈,小孙呀,这很明显是连接Oracle数据库的DBI 和DBD-Oracle模块没安装好呀.安一下就OK了. Windowns中ActivePerl5.8.8版本,能直连上网的情况下,我们打开一下cmd窗口,直接运行ppm后就可以出现很多模块,查找到我们要安装的模块,找到点选后右键出现Install xxxx 点击即可安装.所有待安装的模块完成后,一切OK了就.
小秋哥,么有说清楚啊你~~  ActivePerl5.8.8版本的话,在com窗口输入ppm回车后会调用出来perl package manager窗口,里面都是一些模块。 如果要安装DBI模块,鼠标点好以后,然后点工具栏上的view all packages按钮,里面会把相关模块里的详细内容罗列出来,你想装哪部分,然后右键选中安装。 然后程序再测试就可以了。