Powered by Ajaxy
Digg StumbleUpon LinkedIn YouTube Flickr Facebook Twitter RSS Reset

Perl: find the number of days between two dates or times

use Date::Calc qw(Delta_Days);
@date1 = (2011, 1, 30);        
@date2  = (1985, 3, 05);     
# calculate the difference between the dates
$difference