my $err;
my $dtopt= DateCalc( $dt1 ,$dt2, \$err, 3);