in reply to How to get 3-letter month abbreviations ?

Try
$month = lc(substr(scalar localtime, 4, 4));

[download]
You may also wan't to look at localtime.

In Section Seekers of Perl Wisdom