Help for this page
use Date::Manip qw(ParseDate Date_Cmp); sub sortDate { ... "Thu 15 Aug 96"); my @i = sort &sortDate @dates;
my @i = sort { &Date_Cmp(&ParseDate($a),&ParseDate($b)) } @dates;
www.com | www.net | www.org
No recent polls found