[Mimedefang] Perl help: quarantine and bounce criteria

Kevin A. McGrail kmcgrail at pccc.com
Tue Jan 25 23:45:37 EST 2005


This regexp has assisted me well in this issue and might do the same since 
it is a fairly strict check for a match.  I'm sure I picked it up from 
someone on the MD list so no props to anyone but them:

loop on length of $Recipients array and:

if ($Recipients[$i] =~ /^<?kmcgrail@(pccc.com|thoughtworhty.com)\.com>?$/i) 
{
  ...
}

Regards,
KAM

----- Original Message ----- > Bingo! @Recipients includes the angle 
brackets in the addresses, so I need
> to add those to my expression or remove the ^ anchor. I chose the former.




More information about the MIMEDefang mailing list