perl -e'print (localtime())[5]'