時刻の計算
ブログがどの程度の頻度で更新されているかを調べるのに
少し調べてみた。二つの記事の更新日時を取得して差分を
求めれば、どれぐらい更新されていないかがわかるはず
DateTimeオブジェクトは演算子のオーバロードを行っており、
イメージに近い感じで日付の計算、比較が行える.
#!/usr/local/bin/perl use strict; use warnings; use DateTime; my $dt1 = DateTime->new( year => 2010, month => 3, day => 15, ); my $dt2 = DateTime->new( year => 2009, month => 12, day => 15, ); my $dt3 = $dt1 - $dt2; print "Delta month ", $dt3->delta_months, "\n"; # Delta month 3
引き算の場合は DateTime::Durationオブジェクトが返される。
delta_months, delta_daysで月日の差分が求められます。これで
3ヶ月記事が更新されていないなんていうのが簡単に求められそう
ですね。