Converting date to specified format and two date comparisions

Question

Given Two Dates:

$Date1

format: yyyy-mm-dd hh:mm:ss eg:  2013-05-21 07:47:21

$Date2

Answer 1

Parse the date using regular expressions and use the Time::Local functions to convert into seconds past 1 Jan 1970 to compare integers.