perl -MPOSIX -le 'print strftime("%m%d%H%M", gmtime shift)' "$x"