perl-dbi - 检索执行的语句

Question

所以我有这个非常简化的片段：

@cmd_arry = ("Bob Newhart", "54");
$sqlCmd = "UPDATE foobar SET name = ?, age = ?";
$sth = $dbh->prepare( $sqlCmd);
$resultCnt = $sth->execute( @cmd_arry);
if( my $errMsg = $dbh->errstr) {
  $what_actually_executed = <what?>

问题：如何检索AS EXECUTED语句，即数据绑定发生后？我想要一种捕获实际执行语句的方法，包括绑定值，如果出现问题。

Answer 1

你问：

  

如何检索AS EXECUTED语句，即数据绑定发生后？

一般情况下你不能。大多数非玩具RDBMS将执行绑定服务器端，而不是客户端，大多数非玩具perl DBD驱动程序将利用它。检查数据库服务器的日志。

然而，DBI's tracing facility可能会给你足够的信息。祝你好运。

<强>更新

user4035在评论中链接到相关的perlmonks thread，它提供了所需绑定变量插值的模拟。