s/\S+/$'-$&/ge,/(.*?)\1+-/,print$1=~y/ //,$/for<>