[Mimedefang] add_recipient function

[An.H.Nguyen]

Sorry to bother... I've found the mistake and made it work...
      my ($recip);
      foreach $recip (@Recipients) {
      if ($recip =~ m/\@isc\.sjsu\.edu>?$/i) {
      add_recipient('ahnguyen at sjsu.edu');
      }
      }

Thanks
----- Original Message ----- 
From: "An.H.Nguyen" <annguyen251 at hotmail.com>
To: <mimedefang at lists.roaringpenguin.com>
Sent: Thursday, July 19, 2007 4:37 PM
Subject: [Mimedefang] add_recipient function


>I try to add recipient to the below filter code but it does not work. 
> Could anyone help please?
> Thanks,
> An Nguyen
> 
> ===========================================
> sub filter_end ($) {
>    my($entity) = @_;
> 
>    # No sense doing any extra work
>    return if message_rejected();
> 
>      my $recip;
>      if ($recip =~ m/\@subz\.domainz\.edu>?$/i) {
>      add_recipient('myemail at domain1.com');
>      }
> 
> ==============================================
> _______________________________________________
> NOTE: If there is a disclaimer or other legal boilerplate in the above
> message, it is NULL AND VOID.  You may ignore it.
> 
> Visit http://www.mimedefang.org and http://www.roaringpenguin.com
> MIMEDefang mailing list MIMEDefang at lists.roaringpenguin.com
> http://lists.roaringpenguin.com/mailman/listinfo/mimedefang
>