"$System.in".replaceAll(/\*[^-]+\*/){s->n=0 for(i=42;~i;i=s.indexOf('*',i+2))s[i,i-2,i-42]=='***'&&n++ println n}