my $startdate = timelocal(0,0,0,1,0,2002-1900); # Jan 1
my $enddate = timelocal(0,0,0,2,0,2002-1900);   # Jan 2