my $datestr = "$year.01.01-$year.$month.$day";