1.安裝DBI和DBD::Oracle 模塊。

下載地址：

搜索DBI，DBD::Oracle

如果你的linux可以連接網絡，執行命令：

#wget

#wget

下載到當前目錄。

2.安裝

這里主要都是源碼安裝。

解壓到目錄：DBI-1.622

#tar –zxvf? DBI-1.622.tar.gz

安裝可以查看README文檔。

一般步驟為

DBD::Oracle安裝與DBI相同。

3.

配置環境變量

# export ORACLE_HOME=/u01/oracle

# export ORACLE_USERID='scott/tiger@ora11gR2'

# export PATH=$ORACLE_HOME/bin:$PATH

# export LD_LIBRARY_PATH=$ORACLE_HOME/lib:$LD_LIBRARY_PATH

上面的方法只在當前登錄環境有效，重新登陸后還需要重新配置。

這里建議的方法是使用Oracle 用戶。或者將Oracle用戶下.bash_profile文件拷貝到root目錄下。

注意：LD_LIBRARY_PATH一定要修改，否則會報如下錯誤：

install_driver(Oracle) failed: Can't load '/usr/lib/perl5/site_perl/5.8.5/i386-linux-thread-multi/auto/DBD/Oracle/Oracle.so' for module DBD::Oracle: libclntsh.so.10.1: cannot open shared object file: No such file or directory at /usr/lib/perl5/5.8.5/i386-linux-thread-multi/DynaLoader.pm line 230.

4.數據庫連接簡單示例：

點擊(此處)折疊或打開

#!/usr/bin/perl -w

use strict;

use warnings;

use DBI;

my $dbname="orcl";

my $user = "omc";

my $passwd = "omc";

my $dbh=DBI->connect("dbi:Oracle:$dbname",$user,$passwd) or die "can't connect to database";

my $sth = $dbh->prepare("select count(*) from fx_alarm");

$sth->execute;

my $count = $sth->fetchrow_array;

$sth->finish();#Indicates to DBI that you are finished with the statement

print $count."\n";

$dbh->disconnect;

print "hello\n";

總結

以上是生活随笔為你收集整理的perl连接oracle的方法,Perl 连接Oracle 数据库的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。