perl -e '($sec, $min)=localtime time; printf "%.2d:%.2d", $min, $sec'

##</code><code>##

perl -e '$,=":";print reverse @ms=(localtime)[0, 1];'