($year, $month, $day) = split(/[.\-\/]/, $date, 3);