[Perl] => [DBI]


この日記のはてなブックマーク数 このエントリーを含むはてなブックマーク

perlからデータベースに接続するにはDBIモジュールを使用します。


以下はPostgreSQLの場合。


#モジュール読み込み
use DBI;


#データベースに接続
my $dbname = 'dbname' #データベース名
my $dbhost = 'dbhost'; #ホスト名
my $dbuser = 'dbuser'; #ユーザ名
my $dbpass = 'dbpass'; #DBパスワード

my $dbh = DBI->connect("DBI:Pg:dbname=$dbname;host=$dbhost","$dbuser","$dbpass",{AutoCommit => 1}) || warn $DBI::errstr;


#SQL文の準備
my $sth = $dbh->prepare("SELECT * from table_name");


#SQL文の実行
$sth->execute;


#SQL実行結果を表示
while (@row = $sth->fetchrow_array){
print "@row\n";
}


#データベースへの接続を切断
$sth->finish;
$dbh->disconnect || warn $dbh->errstr;


※INSERT文にてNULL値を与えるにはundefをわたせばよい。



関連記事
SQL::Abstract
DBD::Pgのインストール
doメソッド
カラム名の一覧を取得
該当するレコードの数を取得するには
fetchall_arrayref
fetchrow_hashref
ラージオブジェクトのインポート
ラージオブジェクトの削除
ラージオブジェクトの書き込み
ラージオブジェクトのデータを取得
DBI - database handle
広告