作者：Digital Observer（施嘉伟）
Oracle ACE Pro: Database
PostgreSQL ACE Partner
11年数据库行业经验，现主要从事数据库服务工作
拥有Oracle OCM、DB2 10.1 Fundamentals、MySQL 8.0 OCP、WebLogic 12c OCA、KCP、PCTP、PCSD、PGCM、OCI、PolarDB技术专家、达梦师资认证、数据安全咨询高级等认证
ITPUB认证专家、PolarDB开源社区技术顾问、HaloDB技术顾问、TiDB社区技术布道师、青学会MOP技术社区专家顾问、国内某高校企业实践指导教师

一、安装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