Postgresql-perl
PostgreSQL-Perlインターフェイス
インストール
PostgreSQLは、Perlプログラミング言語用のデータベースアクセスモジュールであるPerl DBIモジュールを使用してPerlと統合できます。 標準のデータベースインターフェイスを提供する一連のメソッド、変数、および規則を定義します。
以下に、Linux/UnixマシンにDBIモジュールをインストールする簡単な手順を示します-
あなたがDBI用のSQLiteドライバをインストールする必要がある場合、それは次のようにインストールすることができます-
Perl PostgreSQLインターフェースの使用を開始する前に、PostgreSQLインストールディレクトリで pg_hba.conf ファイルを見つけ、次の行を追加します-
次のコマンドを使用して、実行されていない場合に、postgresサーバーを起動/再起動できます-
DBIインターフェイスAPI
以下は重要なDBIルーチンで、PerlプログラムからSQLiteデータベースを操作するための要件を満たすことができます。 より洗練されたアプリケーションをお探しの場合は、Perl DBIの公式ドキュメントをご覧ください。
S. No. | API & Description |
---|---|
1 |
DBI→connect($data_source, "userid", "password", \%attr) 要求された$ data_sourceへのデータベース接続またはセッションを確立します。 接続が成功した場合、データベースハンドルオブジェクトを返します。 データソースの形式は次のとおりです。 DBI:Pg:dbname = $ database; host = 127.0.0.1; port = 5432 PgはPostgreSQLドライバー名で、testdbはデータベースの名前です。 |
2 |
$dbh→do($sql) このルーチンは、単一のSQLステートメントを準備して実行します。 影響を受けた行の数またはエラー時にundefを返します。 -1の戻り値は、行数が不明、適用できない、または利用できないことを意味します。 ここで、$ dbhはDBI→connect()呼び出しによって返されるハンドルです。 |
3 |
$dbh→prepare($sql) このルーチンは、データベースエンジンによる後の実行のためにステートメントを準備し、ステートメントハンドルオブジェクトへの参照を返します。 |
4 |
$sth→execute() このルーチンは、準備されたステートメントの実行に必要な処理を実行します。 エラーが発生すると、undefが返されます。 実行が成功すると、影響を受ける行の数に関係なく常にtrueが返されます。 ここで、$ sthは、$ dbh→prepare($ sql)呼び出しによって返されるステートメントハンドルです。 |
5 |
$sth→fetchrow_array() このルーチンは、データの次の行をフェッチし、フィールド値を含むリストとしてそれを返します。 nullフィールドは、リスト内のundef値として返されます。 |
6 |
$DBI::err これは、$ h→errと同等です。$ hは、$ dbh、$ sth、$ drhなどのハンドルタイプのいずれかです。 これは、最後に呼び出されたドライバーメソッドからネイティブデータベースエンジンのエラーコードを返します。 |
7 |
$DBI::errstr これは、$ h→errstrと同等です。$ hは、$ dbh、$ sth、$ drhなどのハンドルタイプのいずれかです。 これは、最後に呼び出されたDBIメソッドからのネイティブデータベースエンジンエラーメッセージを返します。 |
8 |
$dbh→disconnect() このルーチンは、DBI→connect()の呼び出しによって以前に開かれたデータベース接続を閉じます。 |
データベースへの接続
次のPerlコードは、既存のデータベースに接続する方法を示しています。 データベースが存在しない場合は、データベースが作成され、最終的にデータベースオブジェクトが返されます。
次に、上記のプログラムを実行してデータベース testdb を開きます。データベースが正常に開かれている場合は、次のメッセージが表示されます-
テーブルを作成する
次のPerlプログラムを使用して、以前に作成したデータベースにテーブルを作成します-
上記のプログラムが実行されると、 testdb にCOMPANYテーブルが作成され、次のメッセージが表示されます-
INSERT操作
次のPerlプログラムは、上記の例で作成したCOMPANYテーブルにレコードを作成する方法を示しています-
上記のプログラムが実行されると、COMPANYテーブルに特定のレコードが作成され、次の2行が表示されます-
SELECT操作
次のPerlプログラムは、上記の例で作成したCOMPANYテーブルからレコードを取得して表示する方法を示しています-
上記のプログラムが実行されると、次の結果が生成されます-
更新操作
次のPerlコードは、UPDATEステートメントを使用してレコードを更新し、COMPANYテーブルから更新されたレコードをフェッチして表示する方法を示しています-
上記のプログラムが実行されると、次の結果が生成されます-
削除操作
次のPerlコードは、DELETEステートメントを使用してレコードを削除し、COMPANYテーブルから残りのレコードを取得して表示する方法を示しています-
上記のプログラムが実行されると、次の結果が生成されます-