my $content = do {local $/=undef; }; $content =~ m#cingular">(.+?)<\/font>\s*<\/b>
(.+?)<\/p>#si; use Data::Dumper; print Dumper [$1, $2]; __DATA__ cingular">text to match here

all of this stuff no matter what BR tags or whatever is found should be matched