DBIプログラミング

　Perlで、DBIモジュールを使って、データベースをアクセスするプログラムの作成方法についてまとめてあります。 データベースは、PostgreSQLを使っています。

DBI/DBDについて

　DBI/DBDモジュールは、Perlで各種データベースをアクセスするためのモジュールです。 DBIモジュールは、データベースに依存しない処理モジュールで、DBDモジュールは、各データベース毎に依存する処理モジュールです。 ここでは、PostgreSQLのDBDモジュールを使っています。

         Perlスクリプト
              |
         DBIモジュール
              |
     +--------+--------+
     |                 |
PostgreSQL対応    ORACLE対応
DBDモジュール     DBDモジュール
     |                 |
 PostgreSQL         ORACLE
データベース      データベース

　DBDモジュールの例としては、以下のものがあります。

DBIメソッド一覧

　データベースにアクセスするためのDBIメソッドには以下の種類があります。 DBIメソッドには、データベースハンドルメソッド（dbh）と、ステートメントハンドルメソッド（sth）があります。

• データベースハンドルメソッド
  connectメソッドで接続したデータベースに関するメソッド
  $dbh->メソッド名();で呼び出す
• ステートメントハンドルメソッド
  prepareコマンドで用意したSQL文に関するメソッド
  $sth->メソッド名();で呼び出す

　ここでは、よく使われるメソッドのみまとめてあります。

詳細は、以下のコマンドで、英語版のドキュメントを参照してください。

• perldoc DBI
• perldoc DBD::Pg

エラーの参照方法

　DBIでは、直前のメソッドのエラーは、以下の方法で参照できます。

DBIメソッドの機能

connect

書式

$dbh = DBI->connect($data_source, $user_name);

機能

connectメソッドは、データベースに接続します。
返却値として、データベースハンドル（$dbh）が返ってきます。
このデータベースハンドルは、データベースハンドルメソッドを使うときに必要です。

パラメータ

$data_source データソース
　データベースに依存する情報を以下の形式で設定します。
　　dbi:DBDドライバ名:データベース情報

　DBDドライバ名
　　DBDドライバ名は使用するドライバによって決められています。
　　PostgreSQLのDBDドライバ名は、Pgとなります。

　データベース情報
　　データベース情報は、ドライバ毎に書式が異なります。
　　PostgreSQLの場合は、以下のパラメータがあります。
　　　dbname=データベース名;
　　　host=ホスト名;
　　　port=ポート番号;

$user_name ユーザ名

データベースハンドルメソッドの機能

prepare

書式

$sth = $dbh->prepare($statement);

機能

prepareメソッドは、SQL文（$statement）を実行するための環境を用意します。
SQL文は、perpreメソッドで用意し、executeメソッドで実行し、finishメソッドで終了します。
返却値として、ステートメントハンドル（$sth）が返ってきます。
このステートメントハンドルは、ステートメントハンドルメソッドを使うときに必要です。

do

書式

$rv = $dbh->do($statement);

機能

doメソッドは、SQL文（$statement）を実行します。
内部的には、prepareし、executeし、finishしています。

selectall_arrayref

書式

$ary_ref = $dbh->selectall_arrayref($statement);

機能

selectall_arrayrefメソッドは、SQL文（$statement）を実行し、全データを、配列の配列参照（$ary_ref）として取り出します。

disconnect

書式

$rc = $dbh->disconnect();

機能

disconnectメソッドは、接続しているデータベースを切り離します。

ステートメントハンドルメソッドの機能

execute

書式

$rv = $sth->execute();

機能

executeメソッドは、prepareメソッドで用意したSQL文を実行します。
$rvには、処理した件数が返却されます。

fetchrow_array

書式

@ary = $sth->fetchrow_array();

機能

fetchrow_arrayメソッドは、行のデータを、項目の配列（@ary）として取り出します。

fetchrow_arrayref

書式

$ary_ref = $sth->fetchrow_arrayref();

機能

fetchrow_arrayrefメソッドは、行のデータを、項目の配列参照（$ary_ref）として取り出します。

finish

書式

$rc = $sth->finish();

機能

　finishメソッドは、prepareメソッドで用意したSQL文を開放します。