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