Perlについての質問箱 25箱目
■ このスレッドは過去ログ倉庫に格納されています
0631デフォルトの名無しさん
2006/07/04(火) 14:07:47DBI1.50、DBD-Pg1.22、ActivePerl5.8.8Build817、PostgreSQL8.1.4
のような環境でPerlを用いてデータベースをいじっているのですが
SELECT はできて、INSERT・DELETE ができません。
以下のクエリをコピペして直接DBをいじった場合はできます。
SELECTが出来ているのでDBIがおかしいとかでもないでしょうし。。。
なぜでしょうか?よろしくお願いします。
以下ソース
#!C:\Perl\bin\perl.exe
use DBI;
$dsn = 'DBI:Pg:dbname=soccer;host=localhost;port=5432';
$user = 'postgres';
$password = 'aaaa';
$dbh = DBI->connect($dsn,$user,$password,{RaiseError => 1, AutoCommit => 0});
$query = "INSERT INTO member VALUES ('イングランド', 'FW', '9', 'ルーニー', '1985/10/24', 'マンチェスター・U')";
$sth = $dbh->prepare($query) || die $dbh->errstr;
$rv = $sth->execute || die $dbh->errstr;
$query = "DELETE FROM member WHERE name = '小野 伸二'";
$sth = $dbh->prepare($query) || die $dbh->errstr;
$rv = $sth->execute || die $dbh->errstr;
$dbh->disconnect();
■ このスレッドは過去ログ倉庫に格納されています