@s2 = split /(\d+M)/, @s1;
                @s3 = split /(\d+M)/, @s2;
                @s4 = split /(\d+I)/, @s3;
                @s5 = split /[D]/, @s4;