}
$letter->{content} =~ s/<<\S*>>//go; #remove any stragglers
# $letter->{content} =~ s/<<[^>]*>>//go;
$letter->{content} =~ s/<[^>]*>//go unless $letter->{is_html}; #remove tags if letter is not html
return $letter;
-