Sami Näätänen wrote:
> On Friday 04 May 2007, Bob Kinney wrote:
>> chomp(my @DOMAINS = <$fh>);
>>
>> # construct a portion of a regex
>> my $domain_regex = '(' . join( '|', @DOMAINS ) . ')';
>
> You may want to change this to the following version
>
> my $domain_regex = '(?:' . join( '|', @DOMAINS ) . ')';
>
> This version will avoid that unnecessary capture group.
> I of course assume that you don't need this in some other re to capture
> the matched domain.
> [...]
Actually, the filter could simply reject the message if the header
matches the recipient in a case-sensitive plain comparison.
>>
>> return "500 Already have my Delivered-To header."
>> if $line =~ /^Delivered-To:[EMAIL PROTECTED]/i;
-------------------------------------------------------------------------
This SF.net email is sponsored by DB2 Express
Download DB2 Express C - the FREE version of DB2 express and take
control of your XML. No limits. Just data. Click to get it now.
http://sourceforge.net/powerbar/db2/
_______________________________________________
courier-users mailing list
[email protected]
Unsubscribe: https://lists.sourceforge.net/lists/listinfo/courier-users
