perl -MTime::Piece -le'print Time::Piece->strptime( sprintf( "%06d", "32015"), "%m%Y" )'