use Date::Parse;
my $time = str2time("Wed, 9 Jun 2003 09:50:32 -0500 (EST)");