perlとphpの日付と時刻に基づいて2つの文字列を比較するには？

Question

私は（日付 - 時刻）形式の文字列を "Mon、11 Jul 2011 11:45:07 +08：00"としていますが、このような文字列を日時形式に基づいて比較する必要があります。 。私はここでどのモジュール/メソッドを使うべきですか？

Answer 1

use DateTime::Format::Strptime qw(); 

my $time_str = 'Mon, 11 Jul 2011 11:45:07 +08:00'; 
# your notation of time zone 
# does not comply with relevant standards 
$time_str =~ s/([+-]\d\d):(\d\d) \z/$1$2/msx; # kill colon 

my $parser = DateTime::Format::Strptime->new(
    pattern => '%a, %d %b %Y %T %z', 
    locale => 'en', # 'Mon', 'Jul' are English 
    on_error => 'croak', 
); 

my $datetime = $parser->parse_datetime($time_str); 

# Now you have a DateTime object. To compare, 
# use the overloaded relation operators. 
# <=> operator/sort function works as well. 

if ($datetime < $a_different_datetime) { 
    say 'earlier'; 
} 

Answer 2

PHPの場合、最も簡単な方法は、strtotime（）で時間文字列を変換し、整数値を比較することです。最も高い整数が最新です。

デフォルトのタイムゾーンを設定していない場合、PHPのバージョンによってはDate関数を使用する際に警告が表示されることに注意してください。 またはphp.iniのdate.timezone = ""で、list of supported timezonesとすることができます。

Answer 3

はPHPでそれが

Answer 4

strtotime()と呼ばれていますあなたが持っているタイムスタンプ上のstrtotime（）を試すことができます。通常のコンパレータを使って数値を比較するだけです。

Answer 5

私はこのためにPerlでDate::Manipを使用します。

use Date::Manip; 

my $datestr1 = "Mon, 11 Jul 2011 11:45:07 +08:00"; 
my $datestr2 = "Mon, 18 Jul 2011 11:45:07 +08:00"; 

my $date1 = new Date::Manip::Date; 
my $date2 = $date1->new_date; 
$date1->parse($datestr1); 
$date2->parse($datestr2); 

my $result = $date1->cmp($date2); # => -1, 0, 1 

print $result, "\n";