Greetings:
Comments about how to perform these 5 checks as ONE TEST are welcome -
/\s+\w+\<g.*\>\w+\s+/ REJECT Invalid HTML Spam vG /\s+\w+\<j.*\>\w+\s+/ REJECT Invalid HTML Spam vJ /\s+\w+\<k\w{3,}\>\w+\s+/ REJECT Invalid HTML Spam vK /\s+\w+\<y.*\>\w+\s+/ REJECT Invalid HTML Spam vY /\s+\w+\<z.*\>\w+\s+/ REJECT Invalid HTML Spam vZ
m/\s+\w+\<(?:[gjyz].*|k\w{3,})\>\w+\s+/
I believe that's the same. Maybe I'm missing something though, seems too easy.
James
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>