Hello All,

I created this rule to check for email addresses matching a list to get
added some negative value.
I also tried it with just domains so it would be more efficient, but I
can't seem to get them to run.
Any suggestions?

header TO_SPECIFIC_EMAIL eval:check_to_specific_email()
describe TO_SPECIFIC_EMAIL Mail to a specific email address

score TO_SPECIFIC_EMAIL -2

sub check_to_specific_email {
    my ($self) = @_;
    my $to = lc($self->get('To:addr'));
    my $list_of_address = qr/us...@example.com|us...@example.com|
us...@example.com/;
    if ($to =~ $list_of_address) {
        return 1;
    }
    return 0;
}



--------------------------------------------------------------------
This version was to simply check for the domain matches, but can't seem to
get it to work
--------------------------------------------------------------------

header TO_SPECIFIC_DOMAIN eval:check_to_specific_domain()
describe TO_SPECIFIC_DOMAIN Mail to specific email domain

score TO_SPECIFIC_DOMAIN -2

sub check_to_specific_domain {
    my ($self) = @_;
    my $to = lc($self->get('To:addr'));
    if ($to =~ /\@example1\.com$|\@example2\.com$|\@example3\.com$/) {
        return 1;
    }
    return 0;
}






-- 
Thanks!
Joey

Reply via email to