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


in reply to The day of today

perl -le 'print +(localtime)[3]'

Runs under strict too.

-- Frank