linux下如何用perl连接oracle数据库
1.安装dbi，就是database interface，通用的。有for mysql，for oracle，for sybase的。
perl -MCPAN -e shell
cpan-> install DBI;
cpan-> install DBI;
如果装不上，得从源代码安装
wget http://search.cpan.org/CPAN/authors/id/T/TI/TIMB/DBI-1.605.tar.gz
tar -xzvf DBI-1.605.tar.gz;cd DBI-1.605
perl Makefile.PL
make
make install
tar -xzvf DBI-1.605.tar.gz;cd DBI-1.605
perl Makefile.PL
make
make install
2.安装dbd-oracle之前服务器上必须安装oracle软件或oralce客户端软件，并配置好tnsnames
wget http://search.cpan.org/CPAN/authors/id/P/PY/PYTHIAN/DBD-Oracle-1.21.tar.gz
tar -xzvf DBD-Oracle-1.21.tar.gz;cd DBD-Oracle-1.21
export LD_LIBRARY_PATH=/opt/oracle/product/10.2.0/db_64/lib
perl Makefile.pl -r=build64
make
make install
tar -xzvf DBD-Oracle-1.21.tar.gz;cd DBD-Oracle-1.21
export LD_LIBRARY_PATH=/opt/oracle/product/10.2.0/db_64/lib
perl Makefile.pl -r=build64
make
make install
修改tnsnames.ora，加入需要连接的oracle数据库
ABCDE =
(DESCRIPTION =
(ADDRESS_LIST =
(ADDRESS = (PROTOCOL = TCP)(HOST = XX.XX.XX.XX)(PORT = 2521))
)
(CONNECT_DATA =
(SERVICE_NAME = abcde)
)
)
(DESCRIPTION =
(ADDRESS_LIST =
(ADDRESS = (PROTOCOL = TCP)(HOST = XX.XX.XX.XX)(PORT = 2521))
)
(CONNECT_DATA =
(SERVICE_NAME = abcde)
)
)