[Mimedefang] Perl Question

Jason Englander jason at englanders.cc
Wed Dec 18 14:25:00 EST 2002


On Wed, 18 Dec 2002, Jeff Grossman wrote:

> if $Sender eq 'bind9-users-bounce at isc.org') {

You're missing the opening (

if ($Sender eq 'bind9-users-bounce at isc.org') {

...but $Sender can have <> around it too, so you may want to do something
like this instead (the tr part removes the <>):

my $sender = $Sender;
$sender =~ tr/<>//d;
if ($sender eq 'bind9-users-bounce at isc.org') {

-- 
Jason Englander <jason at englanders.cc>
394F 7E02 C105 7268 777A  3F5A 0AC0 C618 0675 80CA




More information about the MIMEDefang mailing list