Spammers sometimes bumble across real addresses by randomly creating names in a way similar to yours. They don't care if it's a low-yield enterprise, as long as it's not a zero-yield enterprise. You may be slowing their spiders, but are you assisting their name guessing?

Your legit-spider check is a multiple line regex without the /x modifier. Are you sure you're matching what you think you're matching? And what happens when spammers adjust their spiders to spoof a friendly google spider?

Tiny nit: your comment says you're choosing 1000 words but you pick 2000 instead. Don't include any magic numbers in comments, they're just prone to become stale as you adjust the code. This falls along the lines of my maxim, "Strategy in comments, tactics in code." The code snippet in question is already near-literate, so why babble? Save the comments for things that aren't visually obvious: the setup is heavy with comments but the main loop needs a little help.

--
[ e d @ h a l l e y . c c ]

In reply to Re: Can-o-Raid v1.0 by halley
in thread Can-o-Raid v1.0 by hacker

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.