use strict;
use warnings;
use Datetime;
use DateTime::Format::Strptime;

my $Strp = new DateTime::Format::Strptime( pattern => '%a %d-%b-%y', );
my @dates;
while (<DATA>) {
    chomp;
    my @date_text = split(/\|/);

    push( @dates, $Strp->parse_datetime( $date_text[-1] ) );
}
my @sorted_dates = sort @dates;
print map { "$_\n" } @sorted_dates;

__DATA__
|Puerto Rico||Santiago Apostol Catholic School|Las Croabas Road, Urb Santa Isidra|Fajardo|PR||00738|Modesto|Garcia|Counselor|787/863-0524|787/863-6655|Sat 09-DEC-06|
|Puerto Rico||Santiago Apostol Catholic School|Las Croabas Road, Urb Santa Isidra|Fajardo|PR||00738|Modesto|Garcia|Counselor|787/863-0524|787/863-6655|Sat 09-JUN-07|
|Puerto Rico||Santiago Apostol Catholic School|Las Croabas Road, Urb Santa Isidra|Fajardo|PR||00738|Modesto|Garcia|Counselor|787/863-0524|787/863-6655|Sat 10-FEB-07|
|Puerto Rico||Santiago Apostol Catholic School|Las Croabas Road, Urb Santa Isidra|Fajardo|PR||00738|Modesto|Garcia|Counselor|787/863-0524|787/863-6655|Sat 14-APR-07|
|Puerto Rico||Santiago Apostol Catholic School|Las Croabas Road, Urb Santa Isidra|Fajardo|PR||00738|Modesto|Garcia|Counselor|787/863-0524|787/863-6655|Sat 28-OCT-06|
|Puerto Rico||Santiago Apostol Catholic School|Las Croabas Road, Urb Santa Isidra|Fajardo|PR||00738|Modesto|Garcia|Counselor|787/863-0524|787/863-6655|Sun 10-DEC-06|
|Puerto Rico||Santiago Apostol Catholic School|Las Croabas Road, Urb Santa Isidra|Fajardo|PR||00738|Modesto|Garcia|Counselor|787/863-0524|787/863-6655|Sun 10-JUN-07|
|Puerto Rico||Santiago Apostol Catholic School|Las Croabas Road, Urb Santa Isidra|Fajardo|PR||00738|Modesto|Garcia|Counselor|787/863-0524|787/863-6655|Sun 15-APR-07|
|Puerto Rico||Santiago Apostol Catholic School|Las Croabas Road, Urb Santa Isidra|Fajardo|PR||00738|Modesto|Garcia|Counselor|787/863-0524|787/863-6655|Sun 29-OCT-06|