$_=<>;$,<($"=length$&)&&$,or$,=$"while s/c(.*?w.*?w)/$1/;print$,||-1