grep /^[a-z]+$/, (join(" ",<>)=~/(\w+)/g)