Re: unsubscribe

> Btw, does anyone have a procmail recipe for filtering out misdirected
> unsubscribe requests?
This is the only instance of /dev/null in my entire rc.  I tried to make
it conservative.



 WS = "         "  # in the quotation marks is a space and a tab

 :0  # apparent lists; target headers in order of match preference
  * $  ! ^X-BeenThere:.*\/[^$WS].*
  * $  ! ^Sender:.*\/[^$WS].*
  * $  ! ^X-Sender:.*\/[^$WS].*
  { }

 :0 E  # else (reverse-DeMorgan logic), looks like a list
  {
      LISTNAME = $MATCH
      MATCH =

     :0  # look for list noise
      * $    ^Subject:(.*\<)?\/[^$WS].+
      *       MATCH ?? ()\<(remove|unsubscribe)\>
      *    !  MATCH ?? ^^(Fw(d)?|Re):
      {
         :0  # if Content-Type: warrants, pad MAXBODYSIZE
          * Content-Type:(.*\<)?(html|multipart)
          { MAXBODYSIZE = 850 }


         :0
          * $ B ?? < ${MAXBODYSIZE:-500}
          /dev/null
      }


     :0:  # save to LISTNAME, parsed until first space
      *    LISTNAME ?? ^^[^(_at_)]*\/(bernief9|edupage|procmail|\
                                Spam(tools)?( Prevention)?|volition-tech|xdesk)
      * $  LISTNAME ?? ^^\/[^$SPACE]+
      $MATCH
  }



-- 
dman


_______________________________________________
procmail mailing list
procmail(_at_)lists(_dot_)RWTH-Aachen(_dot_)DE
http://MailMan.RWTH-Aachen.DE/mailman/listinfo/procmail