Select Code to Download

my ($year, $month, $day) = $maxdate =~ m/(\d+)-(\d+)-(\d+)/;

my ($year, $month, $day) = split /-/, $maxdate;