DBIx::QueryLogを使ってちゃんとSQLが流れているかテストする - $shibayu36->blog;

DBIのconnectのCallbacksなどでSQLを実行している時とかに、実際にSQLが流れているのかチェックしたい時がある。そういう時どうするのがベスト・プラクティスなのかわからないのだけど、DBIx::QueryLogを使ったら一応できたのでメモ。 テストしたい状況 package My::DBI; use strict; use warnings; use DBI; sub connect { my ($dsn, $username, $password) = @_; my $dbh = DBI->connect($dsn, $username, $password, { Callbacks => { connected => sub { my $dbh = shift; $dbh->do("SET NAMES utf8") or warn $dbh->errstr; retur

[shiba_yu36]

ブログ書いた

[tsucchi1022]

僕は DBD::Mock のログ使うとか Test::Mock::Guard で DBI::db のメソッドを置き換えたりとかしてるけど、これもアリですね