[Perl] => [DBI]


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

ラージオブジェクトの削除にはfunc(OID, 'lo_unlink') を使用します。


[使用例]


#!/usr/bin/perl


use DBI;


#AutoCommitはoffにすること
$dbh = $dbh = DBI->connect("DBI:Pg:dbname=dbname","username","password",{AutoCommit => 0});


#まずオブジェクトIDを取得
my($sth) = $dbh->prepare("SELECT \"OID\" FROM sample);
$sth->execute;
my($oid) = $sth->fetchrow_array();


#ラージオブジェクトの削除
$dbh->func($oid, 'lo_unlink');


$dbh->commit();
$dbh->disconnect();



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