It just a fact that email harvester look for simplistic pattern like m{(?>[\w\.\-]+)\@\w+[.][\w.]*}g
So with this one you can easily encode the email you have to publish with the assurance that most harvester will miss it (keep a good anti-spam tool running anyway :-) )
... you could use it as well for publishing (on perlmonks ?) complicate HTML-compatible expressions if you just remove the '"mailto:" .'

echo me@example.com |perl -MHTML::Entities -nle 'print "mailto:" . HTM
+L::Entities::encode_numeric($_,"\0-\377")'
[download]