gets;s=[t=$&.size,s||t].min while$_.sub! /c(.*?w.*?w)/,'\1';p s||=-1