my $dtopt= DateCalc($dt1,$dt2,1);