$ date|awk '{print $4}'|awk -F: '{print $1$2}'|cut -c3-4 19 #### $ perl -e 'print( (localtime)[1], "\n" )' 19