Another option would be to use the Time::Piece module. It replaces the built in localtime function with an object based method.

You could then do something like this:

use Time::Piece;
my $t = localtime($epoch);
print $t->strftime("%m/%d/%y %H:%M:%S");
[download]