The trouble is not with regexp but with lines to match.

But we can fix them:

my $prev = '';
LINE: while ( <> ) {
  next LINE if "$prev$_" =~ m/\.{4}<B.*ird>/s .. /(\+\=\+)$/;
  print;
  $prev = $_;
}
[download]