Convert your dates to a common, comparable representation. I typically use "seconds since 0000 Jan 1, 1970" aka "unix time" or "GMT". See the docs for Time::Local or try your hand at one of the date manipulation modules from CPAN (DateTime, Date::Manip, Date::Parse, etc.)