Perl から Oracle データベースに接続する方法

2年 ago
海斗, 葵
1 minute

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();

データベース名、ホスト名、ポート番号、ユーザー名、パスワードを自分のデータベースの情報に置き換えます。すると、任意の SQL クエリを実行して、クエリ結果を処理できます。

これは単なる例ですが、データの挿入、更新、削除など、他にも様々な操作を行うことができます。詳細については、Perl の DBI と DBD::Oracle のドキュメントを参照してください。

bannerAds