Help for this page
perl -e '($sec, $min)=localtime time; printf "%.2d:%.2d", $min, $sec'
perl -e '$,=":";print reverse @ms=(localtime)[0, 1];'