use warnings;
use strict;

##</code><code>##

use DateTime;

my @dates;
while(<...>)
{
  my $date = DateTime->new(...);
  push @dates, $date;
}

my @sorted = sort @dates;