通过 Perl DBI 在 Oracle 中进行多语句处理

Question

有没有办法我可以使用 Oracle / DBI / Perl 做这样的事情。

use DBI;
my $dbh = DBI->connect( oracle_stuff );
my $sql = <<EOF;
select current_timestamp(3) from dual;
select current_timestamp(3) from dual;
EOF
my $sth  = $dbh->prepare($sql);
print $sth->execute();

显然我想处理比 2 x current_datetimes 大得多的东西，但这是我的小例子。我不断收到错误消息：SQL 命令未正确结束 :-(

Answer 1

prepare 语句正在等待一个 '?'喜欢在这里建议 DBI 包的文档http://search.cpan.org/dist/DBI/DBI.pm

例如：

$sth = $dbh->prepare('select current_timestamp(?) from dual')
$sth->execute(3);
$sth->execute(4);
$sth->execute(5);

等等……