DateTime::Format::DateParse

データベースに datetime 型(2006-06-20 19:00:00) で格納されているデータをひっぱってきて、それを元に計算したいなぁーとかいう時の話。

今まで

• datetime 型→ epoch → DateTime->from_epoch で DateTime のオブジェクト生成
• データベースに epoch でもデータいれておく → DateTime->from_epoch で（略

とかやってたんだが、DateTime::Format::DateParse を使えば、DateTime のオブジェクトを返してくれるので、そんなことしなくてもよい

use DateTime::Format::DateParse;

my $datetime = '2006-06-20 19:00:00';
my $dt = DateTime::Format::DateParse->parse_datetime($datetime);
print $dt->strftime("%F %T\n");
print $dt->datetime,"\n";
print $dt->epoch,"\n";