Perlでは、ISOフォーマット（％Y-％m-％dT％H：％M：％SZ）で日付と時刻を比較するにはどうすればよいですか？

Question

ISOフォーマット—の2つの日付（ファイルから動的に受信）を比較したいと考えています。 2011-12-14T17:22:52Z — in Perl。どうしたらいいですか？

Answer 1

あなたが表示さISO 8601表記の大きな利点は、それが文字列の比較と比較することができるということです。

my $v1 = "2011-12-14T17:22:52Z"; 
my $v2 = "2012-01-03T19:13:49Z"; 

print "$v1 earlier than $v2\n" if $v1 lt $v2; 

これは、値がすべてのズールー族の時間であると仮定し（Zは別名UTC、タイムゾーンです） 。異なるタイムゾーンを使用している場合は、単一のタイムゾーン（UTCは分かりやすい選択肢）に正規化して比較する必要があります。

---

注慎重用語'string comparison'。

Perlでは、<オペレータが2つの数値を比較します。提示された値は、フック、詐欺、またはブルートフォースと無知によって数に強制されます。たとえば、if ("A" == "B")が真であるのは、"A"が数字として扱われるため、"B"です。日付/時刻文字列は、数値比較を使用する場合に限り、数値が年の構成要素であるかのように扱われます。 （そのニーモニック元のFortran比較演算子に基づくかもしれない：lt、le、gt、ge、eq、ne及びcmp）

文字列比較演算子が文字列を比較するために使用されます。数値を比較するには、数値比較器（<,<=、>、>=、!=、==および<=>）を使用します。比較の種類を区別するように注意してください。

Answer 2

あなたの日付は、（質問はこれを明示的に言及しなかった）同じ時間帯に必ずしもないている場合は、解析すると、日付文字列を自分で計算するよりも、専用の日付&時間モジュールを使用したほうが良いと思います。比較は文字列ベースの答えで文字列比較とは異なり、2つのオブジェクト間の数値比較を使用していることを

use DateTime::Format::ISO8601; 

my $dt1 = DateTime::Format::ISO8601->parse_datetime('2011-12-14T17:22:52Z'); 
my $dt2 = DateTime::Format::ISO8601->parse_datetime('2011-12-14T17:22:52+01:00'); 

if ($dt1 < $dt2) { 
    print "$dt1 is first\n"; 
} else { 
    print "$dt2 is first\n"; 
} 

注：ここではDateTimeとDateTime::Format::ISO8601モジュールを使用した例です。これは、DateTimeが比較演算子と文字列補間 "演算子"にオーバーロードしているために機能します。