在 Perl 中，连接到数据库通常使用 DBI（Database Interface）模块。DBI 是一种用于数据库编程的标准接口，支持多种数据库驱动。

以下是使用 DBI 模块连接到 MySQL 数据库的基本示例：

1. 安装 DBI 模块：确保安装了 DBI 模块和适用于你的数据库的 DBD 驱动程序。例如，对于 MySQL，你需要安装 DBD::mysql。

cpan DBI  
cpan DBD::mysql  

2. Perl 脚本示例：

use strict;  
use warnings;  
use DBI;  
# 数据库配置信息  
my $dsn = "DBI:mysql:database_name;host=localhost";  # 数据库名称和主机  
my $username = "your_username";  
my $password = "your_password";  
# 创建数据库句柄  
my $dbh = DBI->connect($dsn, $username, $password, {  
    RaiseError       => 1,  # 发生错误时抛出异常  
    AutoCommit       => 1,  # 自动提交  
    mysql_enable_utf8 => 1, # 如果使用 MySQL，并需要 utf8 支持  
}) or die $DBI::errstr;  
# 执行查询  
my $sth = $dbh->prepare("SELECT * FROM your_table") or die $dbh->errstr;  
$sth->execute() or die $sth->errstr;  
# 处理结果集  
while (my @row = $sth->fetchrow_array) {  
    print "Row: @row\n";  
}  
# 清理  
$sth->finish;  
$dbh->disconnect;  

重要事项：

• 数据库驱动：根据你使用的不同数据库类型，使用相应的 DBD 驱动。例如，若是 PostgreSQL，则使用 DBD::Pg 驱动。

• 错误处理：代码中 $dbh->errstr 和 $sth->errstr 用于获取最近一次数据库操作的错误信息。

• 安全性：建议使用 prepare 和 execute 来执行 SQL 语句，以防止 SQL 注入攻击。

• 字符编码：确保设置适当的字符编码（如 mysql_enable_utf8）以处理非 ASCII 字符。

此示例仅用于演示基础的数据库连接和查询，实际应用中可能需要加入更多的错误处理以及根据具体需求调整选项。