my $date_string = sprintf('%02d%02d%02d', $year%100, $month, $day);