Làm cách nào để in truy vấn SQL được thực thi sau khi DBI của Perl điền vào chỗ dành sẵn?

Xem Truy tìm trong DBI . Các công việc sau đây hoạt động bằng cách sử dụng DBD::SQLite nhưng tạo ra rất nhiều sản lượng:

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

Đầu ra:

<- prepare('SELECT ... FROM ... WHERE ... = ?')= DBI::st=HASH(0x21ee924) at booklet-excel.pl line 213

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

vv, v.v.

Bạn có thể cắm bộ lọc của riêng bạn vào luồng theo dõi để chỉ giữ prepare s.