in reply to Epoch to specific output
Something like the following (substituting your epoch value for time() )
$ perl -MPosix -E 'say POSIX::strftime("%m%d%H%M",localtime(time()))' 01021644
print "Good ",qw(night morning afternoon evening)[(localtime)[2]/6]," fellow monks."
In Section
Seekers of Perl Wisdom