use Excel::Writer::XLSX::Utility;
...
my $ndate = xl_parse_date($date); 
$worksheet->write_date_time($row, $col, $ndate, $format);