25、Perl数据库编程：从准备到定制化操作

Perl数据库编程：从准备到定制化操作

1. 准备Perl环境

在开始使用Perl进行数据库编程之前，需要确保DBI模块和相关的DBD驱动已经安装。不同的Linux版本可能已经预装了这些模块。例如，在RedHat Linux中，通过up2date服务安装MySQL时，会自动下载、安装和配置DBI和DBD::mysql模块。

可以使用以下命令检查DBI和DBD::mysql模块是否安装：

man DBI
man DBD::mysql

如果上述命令提示“没有相关手册条目”，可以使用以下命令搜索模块：

find `perl -Te 'print "@INC"'` -name '*.pm' -print | grep 'DBI.pm'
find `perl -Te 'print "@INC"'` -name '*.pm' -print | grep 'mysql.pm'

或者使用大多数Linux发行版提供的 locate 工具：

locate DBI.pm
locate mysql.pm

如果这些命令没有输出，则需要从CPAN安装缺失的模块。

1.1 检查DBI安装情况

可以使用以下简单的Perl程序 check_drivers 来检查DBI的安装状态，并列出已安