By using the number of seconds since the epoch, you can use:

my (@date) = localtime($numSeconds);
[download]

See the time and localtime data in perldoc.