$@=29628;s/./y$   IIVCXL426      (-:V$XIVX
LMCDIVX$dfor$$_   .=5x$&*8%      $@;$$$_=$
_/egfor-4e3..0;   $;=qq/LXX      IV+CXVII+
      CXV            +CX            VI+
      XXX            II+            XCV
      II+            CX+            CXI
      +CX            VI+            CIV
      +CI            +CX            IV+
      XXX            II+            LXX
      X+C               I+C      XIV
      +CV               III      +XX
      XII               +CI      V+X
      CVI               I+X      CIX
      +CV               II+      CI+
      CXI               V+X      LIV
      +X+               XLV      III
      C+C               MII      XV+
      DXI               M+I      MCC
      MCM                  +XXIII
      DCI                  MMV+II
      C+I                  MMVIII
/;$;=~s/\s+//g;            print+
eval(join+q/./,            map-${
$_},+split/\+/,            ~~$;);