<>=~s#(.*?)((w)+)#$y|=$x=$1&&$2;$$x.=$1.$/#ger;print$$y