http://qs321.pair.com?node_id=981133


in reply to Date Handling in Perl

perldoc -f localtime - For all your basic time manipulation needs.
perldoc Date::Manip - For more complex manipulations with end of month and edge cases solved for you.

print "Good ",qw(night morning afternoon evening)[(localtime)[2]/6]," fellow monks."