Perl中的数据库删除操作
要从数据库中删除某些记录时,需要PerlDELETE操作。以下是从TEST_TABLE删除AGE等于30的所有记录的过程。此操作将执行以下步骤。
根据所需条件准备SQL查询。这将使用prepare() API完成。
执行SQL查询以从数据库中删除所需的记录。这将使用execute() API完成。
释放固定手柄。这将使用 finish()API完成。
如果一切正常,请执行 此操作,否则您可以回滚完整的事务。
$age = 30;
my $sth = $dbh->prepare("DELETE FROM TEST_TABLE WHERE AGE = ?");
$sth->execute( $age ) or die $DBI::errstr;
print "删除的行数:" + $sth->rows;
$sth->finish();
$dbh->commit or die $DBI::errstr;使用do语句
如果您正在执行UPDATE,INSERT或DELETE,则没有从数据库返回的数据,因此执行此操作有捷径。您可以使用do语句执行以下任何命令。
$dbh->do('DELETE FROM TEST_TABLE WHERE age =30');如果成功,则返回true值;如果失败,则返回false值。实际上,如果成功,它将返回受影响的行数。在该示例中,它将返回实际删除的行数。
热门推荐
10 五一公司放假祝福语简短
11 追星女孩的祝福语简短
12 给长辈端午祝福语 简短
13 生日祝福语有诗意简短
14 团圆日祝福语简短
15 中秋商务祝福语简短最新
16 温暖文艺简短祝福语短句
17 男孩上学祝福语简短的
18 入住酒店文案祝福语简短