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

##</code><code>##

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