On Fri, 9 Jul 2004, Ashley M. Kirchner wrote:
> sub filter_recipient {
> my($recipient, $sender, $rest) = @_;
> if ($recipient =~ /[EMAIL PROTECTED]>?/i) {
> my($answer, $explanation) =
> md_check_against_smtp_server($sender, $recipient,
> "serpico.pcraft.com", "ivanhoe.pcraft.com");
> } else {
Your $answer and $explanation variables go out of scope after the
close bracket, so later on...
> # Convert TEMPFAIL to CONTINUE
> $answer = 'CONTINUE' if ($answer eq 'TEMPFAIL');
> return ($answer, $explanation);
$answer and $explanation are undefined.
Regards,
David.
_______________________________________________
Visit http://www.mimedefang.org and http://www.canit.ca
MIMEDefang mailing list
[EMAIL PROTECTED]
http://lists.roaringpenguin.com/mailman/listinfo/mimedefang
