今さっきアップロードしました(そのうちCPANにのるでしょう)
http://search.cpan.org/~dmaki/Class-DBI-Plugin-DateTime-0.01/
いままで自前で毎回書いてたのに嫌気がさしたのでモジュールにしてみたわけです。モジュールにしてしまえば
package My::Data::Foo;
use base qw(Class::DBI);
use Class::DBI::Plugin::DateTime::Pg;
__PACKAGE__->columns(All => qw(id a_timestamp));
__PACKAGE__->has_timestamp('a_timestamp');
とかしておけば後で
my $obj = My::Data::Foo->retrieve($key);
my $dt = $obj->a_timestamp();
print $dt->ymd, "\n";
とかできるのですよ。MySQLでもできるぞー。うっほほ。