http://www.perlmonks.org?node_id=783771


in reply to Find the text

What is the long way that you have come up with? ;)
Anyway, you can use normal localtime and use split function to get it
Raghu