in reply to epoch reduction

say for sort values %{{map {join( ' ', ( gmtime($_) )[3..5] ) => $_} @times}};

But only if your input data is already sorted...

;-)

Update: And assuming (cf. Marshall's question above) that by "largest" you mean "latest".

Update 2: And of course if your date-times go back to more than 10 years ago (more precisely, to before 9 Sep 2001 03:46:40), the sort needs to be replaced by sort { $a <=> $b }.