Comment puis-je imprimer la requête SQL exécutée après que DBI de Perl ait rempli les espaces réservés ?

Voir Traçage dans DBI . Ce qui suit fonctionne avec DBD::SQLite mais produit beaucoup de sortie :

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

Sortie :

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

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

etc etc.

Vous pouvez insérer votre propre filtre dans le flux de trace pour ne garder que prepare s.