perl -MPOSIX -e 'print POSIX::strftime("%m%d%H%M",localtime(time())),$/'