perl -e 'print ((gmtime(time))[6]);'