use Spreadsheet::ParseExcel::Utility qw(ExcelFmt); ... my $datefmt = 'yyyymmdd'; # ISO 8601 ... if (defined $cell->{Type} && $cell->{Type} eq 'Date') { $value = ExcelFmt($datefmt, $cell->{Val}); }