$VAR1 = '19th Ave and Eighth Street S.E.';
$VAR2 = 'Boser and Liker Trail S.E.';
$VAR3 = 'Lambert and Jerry Drive S.E.';

##</code><code>##

#!/usr/bin/perl -w

use strict;
use Data::Dumper;


my $var = qq(         <tr>
      <td width="651" height="48"><br>
      This community is grat and
      has lots to offer.</td>
    </tr>
    <tr>
      <td width="651" height="16">Southeast</td>
    </tr>
    <tr>
      <td width="351" height="9">&nbsp;19th Ave and Eighth Street S.E.</td>
    </tr>
    <tr>
      <td width="351" height="6">&nbsp;Boser and Liker Trail S.E.</td>
    </tr>
    <tr>
      <td width="351" height="6">&nbsp;Lambert and Jerry Drive S.E.&nbsp;</td>
    </tr>
);


my @results = $var =~ m/>[&nbsp;]?(.*?)[&nbsp;]?</g;


print Dumper @results;