while(<>) {
if ( m/\b
        (\w\S+)
...