PERLで日付算術を行うための推奨方法は何ですか？

Question

PERLで日付算術を行うための推奨方法は何ですか？

たとえば、今日から3日前の日付を知りたいと言ってください（どこで today = 2010-10-17 と today - 3 days = 2010-10-13）。 Perlでどのようにそれをしますか？

Answer 1

DateTimeおよびDateTime ::持続時間を使用できます

http://search.cpan.org/dist/datetime/lib/datetime/duration.pm

またはUNIXタイムスタンプを使用して作業します。

my $now = time();
my $threeDaysAgo = $now - 3 * 86400;
my ($day, $mon, $year) = (localtime($threeDaysAgo))[3, 4, 5];
printf("Three days ago was %04d-%02d-%02d", $year+1900, $mon+1, $day);

Answer 2

見る CPANのデータタイム （また ここ).

Answer 3

多くの異なる日付と時刻の操作モジュールがあります。

これらには以下が含まれます：

• 日付:: calc - およびadd_delta_days関数
• 日付::マニップ - およびdatecalc関数
• 日付時刻

これらはすべてよく考えられています。さらに他にもたくさんあります。多くは、あなたがしたい算術の種類に依存します。 DateTimeはおそらく最も厳密ですが、日付:: CalcとDate :: Manipは、必要な作業に対応しやすい場合があります。

Answer 4

これは、私が出会った中で最も機能するモジュールです。 日付::マニップ