要連接Oracle數據庫，你需要使用Perl的DBI模塊和DBD::Oracle驅動程序。
首先，你需要安裝DBI和DBD::Oracle模塊。你可以使用CPAN來安裝它們。打開終端，運行以下命令來安裝DBI和DBD::Oracle模塊：
cpan DBI
cpan DBD::Oracle
安裝完成后，你可以使用以下代碼連接Oracle數據庫：
use DBI;
my $database = 'database_name'; # 替換為你的數據庫名稱
my $host = 'host_name'; # 替換為你的主機名
my $port = 'port_number'; # 替換為Oracle數據庫的端口號
my $username = 'your_username'; # 替換為你的用戶名
my $password = 'your_password'; # 替換為你的密碼
# 連接到Oracle數據庫
my $dbh = DBI->connect("dbi:Oracle:host=$host;port=$port;sid=$database", $username, $password)
or die "無法連接到數據庫: " . DBI->errstr;
# 執行SQL查詢
my $stmt = $dbh->prepare("SELECT * FROM table_name");
$stmt->execute();
# 處理查詢結果
while (my @row = $stmt->fetchrow_array) {
# 處理每一行數據
# 例如，打印第一個列的值
print $row[0] . "\n";
}
# 斷開與數據庫的連接
$dbh->disconnect();
請將 database_name、host_name、port_number、your_username 和 your_password 替換為你的實際數據庫信息。然后，你可以執行任何SQL查詢，并處理查詢結果。
這只是一個簡單的示例，你還可以執行其他操作，如插入、更新和刪除數據。有關更多信息，請查閱Perl的DBI和DBD::Oracle文檔。
