There is Date::Format

use Date::Format;

print time2str("%a %b %e %T %Y\n", time);

__END__
Sun Mar 16 11:20:38 2008
[download]

There are lots of formatting options, you should be able to find what you need.