#!/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