Matthew.van.Eerde wrote:
> my $domain = $1 or next; # skip weird emails
oops... should be
my $domain = lc $1 or next; # skip weird emails
as hash keys are case-sensitive.
load_spamdrops() should also make sure the domains of the %spamdrops hash are all
lowercase.
If you want to handle subdomains as well, it gets more complicated.
[EMAIL PROTECTED] 805.964.4554 x902
Hispanic Business Inc./HireDiversity.com Software Engineer
perl -e"map{y/a-z/l-za-k/;print}shift" "Jjhi pcdiwtg Ptga wprztg,"
_______________________________________________
Visit http://www.mimedefang.org and http://www.canit.ca
MIMEDefang mailing list
[EMAIL PROTECTED]
http://lists.roaringpenguin.com/mailman/listinfo/mimedefang
