2008-02-15から1日間の記事一覧

PerlでRFC2822形式の日時をUNIXタイムスタンプにする方法

調べても見つからなかったから、書いてみた。 PHPならstrtotimeで済むんだけど。 use DateTime::Format::Mail; use Time::Local; my $date = "Thu, 14 Feb 2008 19:14:01 +0900"; $date =~ s/\(.*//; # 最後に(JST)などがついている時のための対策 my $datet…