use POSIX "strftime"; $time = lc strftime("%I:%M%p %m/%d/%y", localtime($_[0]));