[Mimedefang] Perl Expression Question
listuser at neo.pittstate.edu
listuser at neo.pittstate.edu
Mon Dec 9 00:49:01 EST 2002
On Sun, 8 Dec 2002, Jeff Grossman wrote:
> > -----Original Message-----
> > From: mimedefang-admin at lists.roaringpenguin.com [mailto:mimedefang-
> > admin at lists.roaringpenguin.com] On Behalf Of David F. Skoll
> > Sent: Sunday, December 08, 2002 9:06 AM
> > To: mimedefang at lists.roaringpenguin.com
> > Subject: Re: [Mimedefang] Perl Expression Question
>
>
> > if ($Sender =~ /-admin\@proftpd\.org>?$/i or
> > $Sender =~ /\@lists\.sourgeforge\.net>?$/i) {
> > # Allow
> > } else {
> > # Reject foreign charsets
> > }
>
>
> Thanks for the help David. Do I need to put anything in the #Allow
> section, or can I just leave it blank? If I have to put something I
> there, what would I put?
I would imagine you would put the actual foreign charset check in the
false and a return statement for the true condition. ie
if ($Sender =~ /-admin\@proftpd\.org>?$/i or
$Sender =~ /\@lists\.sourgeforge\.net>?$/i) {
# Allow
return 0;
} else {
# Reject foreign charsets
Fancy charset checking code or the call for it goes here.
}
That would be my take on it
Justin
More information about the MIMEDefang
mailing list