$data_cell_val = $data_cell -> {Val};
				
my ($iSec, $iMin, $iHour, $iDay, $iMon, $iYear, $iWDay, $iMSec) = ExcelLocaltime ($data_cell_val);
$iYear += 1900;			# $iYear is number of years since 1900
$iMon  += 1;			# $iMon (month) is zero indexed
$data_cell_val = sprintf("%04d.%02d.%02d", "$iYear", $iMon, $iDay);