ネーミングセンスはともかく、 いちいち面倒でしょってことで。 auto_inflate_datetime以外は動かしてません。 多分うごくかな？ package DBIx::Class::AutoInflateDateTimeMySQL; use strict; use warnings; use vars qw( $VERSION ); use base 'DBIx::Clas…

今日は新年会です。やっとです。焼肉食うぞ〜〜。

昨日に引き続きDBICでもやってみた。 こっちはSQLとBindも表示。 package DBIx::Class::QueriesTime; use strict; use warnings; use vars qw( $VERSION ); $VERSION = 0.01; package DBIx::Class::Storage::DBI; use Time::HiRes qw( tv_interval gettimeof…