s/(M)|D/4x@-x5/eg,s/C4//,$\=y/LXVIC4/DCLXM/for(<>)x3;print