You are viewing a plain text version of this content. The canonical link for it is here.
Posted to embperl@perl.apache.org by Neil Gunton <ne...@nilspace.com> on 2001/11/15 21:56:25 UTC
Re: Result of SPAMMODE (was: Question regarding hiding email addresses
in archives)
Gerald Richter wrote:
> I have given this a try, now
>
> richter@ecos.de
>
> becomes
>
> richter at eocs dot de
>
> and the mail addresses aren't links anymore.
>
> look at http://www.ecos.de/~mailarc/embperl/2001-11/msg00089.html.
>
> Does it look better ?
Yeah, to me at least. Thanks! As always, I'm open to differing
opinions...
> > It's unfortunate though that it appears only *new* messages are affected
> > by these directives. Old messages still have the email address visible.
> > I guess what MHonArc does is generate text files, and once it's done
> > that it's out of MHonArc's realm of operations.
> >
>
> Yes, it would be necessary to write a small Perl script to change all the
> old pages
Here's a little script I just whipped up which converts email addresses
to a slightly more obfuscated version. Not exactly the same as what you
have above, but it does the job (I think, I'm not a regex guru by any
stretch)...
Thanks again, Gerald, I know you're real busy with "real" stuff...
All the best
-Neil
#!/usr/bin/perl -w
while (<STDIN>)
{
s/\<(.*?)(?:@)(.*?)\>/<$1 (at) $2>/g;
s/\>(.*?)(?:@)(.*?)\</>$1 (at) $2</g;
print $_;
}
---------------------------------------------------------------------
To unsubscribe, e-mail: embperl-unsubscribe@perl.apache.org
For additional commands, e-mail: embperl-help@perl.apache.org