MovableTypeの日付でソートしたい
こんな形式 => 02/03/2008 01:31:21 PM
use Time::Piece;
use Memoize;
memoize('time_piece');
my @sorted_DATE = sort { $self->time_piece($a) <=> $self->time_piece($b) } @DATE;
sub time_piece {
return Time::Piece->strptime( $_[1], '%m/%d/%Y %H:%M:%S %p' );
}
しまった、%Hでなくて、%Iだった。
そしてTime::Piece1.15では00時はパースエラーになるので、置換してやる必要がある。
もしくはTime::Piece1.20にアップデート。
0 件のコメント:
コメントを投稿