Beginner's Technology

DBI/DBD-pgサンプル(do)

• ikepon
• 2006年05月27日
• コメントする
• トラックバック (31)
• カテゴリー:Perl

do関数に関して説明します。
使用するにはDBIをuseします。

use DBI;

次のファイルをdo.plという名前で保存します。

use DBI;

$dbh = DBI->connect("dbi:Pg:dbname=dbd_test;host=localhost;port=5432", "dbd_test_user", "password2");

$rc = $dbh->do("DELETE FROM TEST1");
print $rc, "\n";
$rc = $dbh->do("INSERT INTO TEST1 (col1, col2) VALUES (1, 10)");
print $rc, "\n";
$rc = $dbh->do("INSERT INTO TEST1 (col1, col2) VALUES (2, 20)");
print $rc, "\n";

$dbh->disconnect();

実行結果は、次の様になります。

> perl do.pl
2
1
1