my $max_date = $dates[0];
foreach $date (@dates[1..$#dates]) {
    $max_date = $date if $date gt $max_date;
}