在Perl的DBI填写占位符之后，如何打印执行的SQL查询？

请参阅DBI中的跟踪。以下使用可以工作，

DBD::SQLite

$dbh->trace($dbh->parse_trace_flags('SQL|1|test'));

输出：

<- prepare('SELECt ... FROM ... WHERe ... = ?')= DBI::st=HASH(0x21ee924) atbooklet-excel.pl line 213

<- execute('Inhaler')= '0E0' at booklet-excel.pl line 215

等等等

您可以将自己的过滤器插入跟踪流中，仅保留

prepare