The most flexible way to do this is to use the strftime() function from the POSIX module that comes with perl. You can do something like:

use POSIX qw(strftime);
                                                                      
+          
$time = time();
                                                                      
+          
print strftime("%m/%d/%Y %H:%M:%S",localtime($time));
[download]

Obviously you will use your own value for $time

/J\