Select Code to Download

use Date::Manip;

...
my $http_date = UnixDate(ParseDate("$date -0612"), "%a, %d %b %Y %H:%M
+:%S %Z");

print "$http_date\n";    # Mon, 03 Nov 2008 20:15:44 EST