@dates_last = $fh->getlines;
	@dates_last = map(m/^(\d+).*$/,@dates_last);