in reply to Re: week of the year
in thread week of the year
I'm going to go ahead and assume that you meant today ;)
utilitarian@busybox ~/$ perl -MTime::Piece -E 'say Time::Piece->strpti +me("080614", "%m%d%y")->week'; 32
print "Good ",qw(night morning afternoon evening)[(localtime)[2]/6]," fellow monks."
In Section
Seekers of Perl Wisdom