use 5.010;  # say
use strict;
use warnings;

use Date::Manip qw( ParseDateString );

my @dates = (
   "Aug 8 12:12:13",
   "Jan 1 21:01:03",
   "Aug 8 12:12:14",
   "Aug 7 09:12:10",
);

$_ = ParseDateString($_).$_ for @dates;
@dates = sort @dates;
say substr($_, 16) for @dates;