map {say |<MDC MCD LX XL VI IV>[4>$_,2+Int($_/2)%%2,4+$_%%2]},^8