use strict; use warnings; while( ) { foreach ( split "" ) { # used .* since HTML code can be nested like injury (my $name) = $_ =~ /(.*?)\<\/b\>/; print "$name\n" if ( defined( $name ) ); } } __DATA__ Suggested Categories or Articles personal injury (0.56)
accident lawyers ( 0.4)
attorneys (0.35)
law firms (0.32)
litigation (0.32)
#### personal injury accident lawyers attorneys law firms litigation