See POSIX::strftime which allows you to format the date in one like:

 POSIX::strftime("%m/%d/%Y", localtime);
[download]

/J\