IIIIIIIIIIIMMMMMMMMMMMMOOOOOOOOOOOOMMMMMMMMMIIIIIIIII

##</code><code>##

while(<>)
{
  $count=0;
  while($_=~/(M+)/g)
  {$count++;}
  print $count;
}