if ( $line =~ /([^ \t]+{80})/ )

##</code><code>##

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxbbbbbbbbbbbbbbbb

##</code><code>##

xxxxxxxxxxxxxxxxxxxxxxxxxx xxxxxxxxxxxxxxxxxxbbbbbbbbbbbbbbbb