Perl DBI MySQL：如何运行多个查询/语句

内容导读

互联网集市收集整理的这篇技术教程文章主要介绍了Perl DBI MySQL：如何运行多个查询/语句，小编现在分享给大家，供广大互联网技能从业者学习和参考。文章包含1022字，纯文字阅读大概需要2分钟。

内容图文

参见英文答案 > Perl DBI – run SQL Script with multiple statements                                    4个
目前,我在MYSQL上运行多个语句,如下所示;

my $sth1 = $dbh->prepare("ALTER TABLE whatever....");
my $sth2 = $dbh->prepare("UPDATE whatever....");
my $sth3 = $dbh->prepare("ALTER TABLE whatever....");
my $sth4 = $dbh->prepare("DROP TABLE whatever....");
my $sth5 = $dbh->prepare("DROP TABLE whatever....");


$sth1->execute;
$sth1->finish;
$sth2->execute;
$sth2->finish;
$sth3->execute;
$sth3->finish;
$sth4->execute;
$sth4->finish;
$sth5->execute;
$sth5->finish;

这段代码工作正常.

但是,我有大约50多个这样的查询.所以你可以想象上面这些线的大小.我上面粘贴的只是5个查询.

题：

使用Perl DBI运行多个MySQL查询/语句是否有更好的优雅方式？

解决方法:

至少,你应该迭代你的sql字符串.也是一个好主意添加或死你的执行方法：

my @sql = (
    q{ALTER TABLE whatever....},
    q{UPDATE whatever....},
    q{ALTER TABLE whatever....},
    q{DROP TABLE whatever....},
    q{DROP TABLE whatever....},
);

for (@sql) {
    my $sth = $dbh->prepare($_);
    $sth->execute or die $dbh->errstr;
}

内容总结

以上是互联网集市为您收集整理的Perl DBI MySQL：如何运行多个查询/语句全部内容，希望文章能够帮你解决Perl DBI MySQL：如何运行多个查询/语句所遇到的程序开发问题。 如果觉得互联网集市技术教程内容还不错，欢迎将互联网集市网站推荐给程序员好友。

内容备注

版权声明：本文内容由互联网用户自发贡献，该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容， 请发送邮件至 gblab@vip.qq.com 举报，一经查实，本站将立刻删除。

内容手机端

---