1）在安裝CPAN前，需要首先安裝Oracle-Client。

２）安裝好Oracle-Client后，要配置tnsnames.ora。用sqlplus測試一下確實可以訪問到這個Oracle實例。

３）安裝好DBI和DBD::Oracle后，perl訪問Oracle的代碼如下：

#!/usr/bin/perl ?

?

use?DBI; ?

?

$dbh?=?DBI->connect("dbi:Oracle:myoradb",?"idata",?"123456")?or?die("DB?connect?error!\n"); ?

?

$sql?=?"select?*?from?dual"; ?

?

$sth?=?$dbh->prepare($sql); ?

?

$sth->execute()?or?die("error!"); ?

?

while(@rows?=?$sth->fetchrow_array) ?

?

{ ?

?

????????foreach(@rows) ?

?

????????{ ?

?

????????????????print?"$_\t"; ?

?

????????} ?

?

????????print?"\n"; ?

?

} ?

?

?

$sth->finish; ?

?

$dbh?->disconnect(); ?

?

exit?0; ?

?

轉(zhuǎn)載于:https://blog.51cto.com/idata/943419

總結(jié)

以上是生活随笔為你收集整理的用perl访问Oracle的全部內(nèi)容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網(wǎng)站內(nèi)容還不錯，歡迎將生活随笔推薦給好友。