透過キャッシュだのレプリケーションだの色々ドライバを書けるが、普通に使う分にはSYNOPSISの通りでいい。 で、DBI->connectで使う%attr、例えば mysql_enable_utf8 を渡すのはどーすんのかなと思ってソース見たら use parent qw/Data::ObjectDriver::Drive…

perlのORMの中には hoge_TRACE=1 することで発行されるクエリを見る事が出来るものがある。 # DBI DBI_TRACE=1 # DBIx::Class DBIC_TRACE=1 # DBIx::Skinny SKINNY_TRACE=1Data::ObjectDriverにも欲しい。ので書いた。 use Data::ObjectDriver::Driver::DBI;…

Data::ObjectDriver（以下DOD）でgroup byとかsumとかcountとかのmysqlの関数を使う場合は、Data::ObjectDriver::SQLのインスタンスを作ってそいつに色々オプションを指定した上でdriverを呼んでselect_oneしてやる。 my $st = Data::ObjectDriver::SQL->new…