s!<a[^>]+href=['"]email[^>]+>[^<]+</a\>!DELETED!gi;

# which becomes this to deal with whitespace issues

s!<\s*a[^>]+href\s*=\s*['"]\s*email[^>]+>[^<]+<\s*/a\s*>!DELETED!gi;