Perl可以通過DBI（數據庫接口）模塊與數據庫交互。這個模塊提供了一個統一的接口，可以連接到各種不同類型的數據庫，比如MySQL、PostgreSQL、SQLite等。下面是一個簡單的示例，演示了如何使用Perl連接到MySQL數據庫，并執行一條簡單的查詢：
use DBI;
# 設置數據庫連接參數
my $dsn = "DBI:mysql:database=testdb;host=127.0.0.1";
my $username = "username";
my $password = "password";
# 連接到數據庫
my $dbh = DBI->connect($dsn, $username, $password) or die "無法連接到數據庫";
# 執行查詢
my $sth = $dbh->prepare("SELECT * FROM users");
$sth->execute();
# 處理查詢結果
while(my $row = $sth->fetchrow_hashref) {
print "ID: $row->{id}, Name: $row->{name}\n";
}
# 斷開與數據庫的連接
$dbh->disconnect();
在上面的示例中，首先需要設置數據庫連接參數，包括數據庫類型、數據庫名稱、主機名、用戶名和密碼。然后使用DBI->connect()方法連接到數據庫。接著使用prepare()方法準備一個查詢語句，并使用execute()方法執行該查詢。最后，使用fetchrow_hashref()方法獲取查詢結果，并輸出到屏幕上。最后使用disconnect()方法斷開與數據庫的連接。
