2013-08-30 53 views
7

私はperlスクリプトの初心者です。私は中に私が分/秒で2つの日付の違いを見つける必要がある要件perlの日付差の計算方法

$date1 = Fri Aug 30 10:53:38 2013 
$date2 = Fri Aug 30 02:12:25 2013 

あなたは、どのように我々はこれを達成ん解析を私に伝えることができ、計算、モジュールのREQとすべて

感謝を持っています Goutham

+0

可能重複以来のPerlの標準部品となっていますPerlの2つの日付の間の日数?](http://stackoverflow.com/questions/821423/how-can-i-calculate-the-number-of-days-between-two-dates-in-perl) –

答えて

14

Time::Pieceなど、時間、分を取得するためのすべての方法の簡単な数学では、[どのように計算することができますが、2007年

#!/usr/bin/perl 

use strict; 
use warnings; 
use 5.010; 
use Time::Piece; 

my $date1 = 'Fri Aug 30 10:53:38 2013'; 
my $date2 = 'Fri Aug 30 02:12:25 2013'; 

my $format = '%a %b %d %H:%M:%S %Y'; 

my $diff = Time::Piece->strptime($date1, $format) 
     - Time::Piece->strptime($date2, $format); 

say $diff; 
1

が続いhttp://metacpan.org/pod/Date::Parse

を参照してください。UNIX時間に両方の日付を変換します単純な数学的減法を使って、2つの間の秒数を見つけることができます。

そして、それは

+0

数学をすることは**あなたに正しい答えを与える**ではありません。 –