try to remove all <> tags with:

$body =~ s/<[^>]*>//sg;
[download]

The s modifier (at the end) tells the search to treat the $body variable as a single line. so \n's don't matter.