You need to provide a Short, Self-Contained, Correct Example that demonstrates the problem like this
#!/usr/bin/perl
use strict;
use Spreadsheet::WriteExcel;
my $workbook = Spreadsheet::WriteExcel->new( 'test1.xls' );
my $worksheet = $workbook->add_worksheet();
# set column format
my $date_format = $workbook->add_format(num_format=>'m/d/yyyy h:mm');
$worksheet->set_column(0,0,15,$date_format);#width 15
$worksheet->write(0,0,'Date');
my $row2 = 1;
while (my $date = <DATA>){
chomp($date);
# convert to ISO8601 yyyy-mm-ddThh:mm:ss.ss
$date =~ s/ /T/;
$worksheet->write_date_time($row2,0,$date);
++$row2;
}
$worksheet->autofilter(0,0,$row2,0);
$workbook->close;
__DATA__
2017-01-08 00:00
2018-04-01 11:00
2010-09-09 13:00
2013-07-09 19:00
poj