next  unless $mneighborhood[$b] eq $mneighborhood;