[Mimedefang] add_recipient
David F. Skoll
dfs at roaringpenguin.com
Thu Feb 21 12:29:13 EST 2002
On Thu, 21 Feb 2002, Jason Englander wrote:
> sub filter_end {
> my $OrigSender = $Sender;
> if (lc($Domain) eq 'foo.org') {
> $Sender = 'postmaster at mydomain.org';
> resend_message('in at mail.foo.org');
> }
> $Sender = $OrigSender;
> if ($Sender =~ /\@foo\.org\>$/i) {
> $Sender = 'postmaster at mydomain.org';
> resend_message('out at mail.foo.org');
> }
> }
You want to be *very* careful... MIMEDefang may be re-invoked on the
resent message (depending on your version of Sendmail). You only want
to resend the message if postmaster at mydomain.org is not already in
@Recipients. But the basic idea is sound.
Regards,
David.
More information about the MIMEDefang
mailing list