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

sunlei6789

我现在写了个程序需要连接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__

royalzhang

cpan

gjqiu

哈哈,小孙呀,这很明显是连接Oracle数据库的DBI 和DBD-Oracle模块没安装好呀.安一下就OK了. Windowns中ActivePerl5.8.8版本,能直连上网的情况下,我们打开一下cmd窗口,直接运行ppm后就可以出现很多模块,查找到我们要安装的模块,找到点选后右键出现Install xxxx 点击即可安装.所有待安装的模块完成后,一切OK了就.

sunlei6789

小秋哥，么有说清楚啊你~~  ActivePerl5.8.8版本的话，在com窗口输入ppm回车后会调用出来perl package manager窗口，里面都是一些模块。 如果要安装DBI模块，鼠标点好以后，然后点工具栏上的view all packages按钮，里面会把相关模块里的详细内容罗列出来，你想装哪部分，然后右键选中安装。 然后程序再测试就可以了。