use Date::Format;
print time2str('%a, %d %b %Y %H:%m:%S GMT', time()), "\n";