基于oracle linux的 DBI/DBD 标准化安装文档(五)

一、安装DBI
DBI(Database Interface)是perl连接数据库的接口。其是perl连接数据库的最优
方法，他支持包括Orcale,Sybase,mysql,db2等绝大多数的数据库，下面将简要
介绍其安装方法。

1.1解压
tar -zxvf DBI-1.616_901.tar.gz

1.2安装依赖
yum install perl-ExtUtils-CBuilder perl-ExtUtils-MakeMaker
yum install perl-Test-Simple-0.98-243.el7.noarch.rpm
yum install gcc
1.3进入目录
cd DBI-1.616/

1.4编译
perl MakefIle.PL
make

1.5执行测试
make test

1.6安装
make install

二、安装DBD:oracle
DBI只是个抽象层，要实现支持不同的数据库，则需要在DBI之下，编写针对不同数据库的驱动，对MySql来说，有DBD::Mysql, 而对Oracle来说，则是DBD::Oracle。其中的DBD这是DataBase Driver之简写

2.1解压
tar -zxvf DBD-Oracle-1.36.tar.gz

2.2环境变量设置（按照真实环境修改）
export ORACLE_HOME=/oracle/app/product/19.3.0/db_1
export LD_LIBRARY_PATH=$ORACLE_HOME/lib:/usr/lib
export TNS_ADMIN=$ORACLE_HOME/network/admin
export ORACLE_USERID=def/oracle
export ORACLE_SID=orcl
export ORACLE_BASE=/oracle/app
2.3进去目录
cd DBD-1.36/

2.4编译
perl MakefIle.PL
make

2.5执行测试
make test

2.6安装
make install

三、测试
3.1创建测试文件
vi check.pl
内容如下：

!/usr/bin/perl
use strict;
use ExtUtils::Installed;
my $inst=ExtUtils::Installed->new();
my @modules = $inst->modules();
foreach(@modules){

my $ver = $inst->version($_) || "???";
printf("%-12s -- %s\n",$_,$ver);
}
3.2给予权限
chmod +x check.pl

3.3进行检测
perl check.pl
结果如下：
DBD::Oracle -- 1.70
DBI -- 1.642
Perl -- 5.16.3