🚀 go-pugleaf

schaefer@vulcan.alphanet.ch (Marc SCHAEFER) writes:
> MIME QP -> 8 bit is also supported with the '9' flag of sendmail 8.8.5.

(that's right, but when I set up LIA's mail sendmail 8.8 didn't exist and it
didn't stabilize before I left and I don't think the new sysadm has had enough
free time to "fix" something that's working... anyway, the point was just that
having procmail as the mail delivery agent allows you to do some neat things in
a fairly clean way)

> > mails are wrongly considered as commercial (most notably the CFP for
> > conferences). I could try to improve it some more, tho.
> However, I am *really* interested by your procmail filter, because
> mine is starting to get inefficient and yours seems to be a lot
> better. Is it freely available ?

The question is odd! it's just a few lines:

SUBJECT=subject
VALUE=1000
ADWORDS="(web page|free|offer|business|money|internet|service|online|thank you|product|receive|technology|recruiting|market|courage|worth|debt|1-800-|income|profit|discount|customer|\\$\\$\\$)"
AD2WORDS="send (me )?an? *e?-?mails? *(to)?"
AD3WORDS="bulk *e?-?mails? *(to)?"

# extract the subject
:0
* ^Subject:\/.*$
{ SUBJECT=$MATCH }

:0 B
* -500^0
* -200^0.2 > 1000
* 500^0 H ?? ^(received|to|cc|from|sender):.*\.(com|net)
* 300^0 SUBJECT ?? ^[^a-z]*$
* $ SUBJECT ?? 300^1 $ADWORDS
* $ 100^1 $ADWORDS
* $ 300^1 $AD2WORDS
* $ 800^1 $AD3WORDS
{ FOLDER=misc/ads }

As you can see, it's just a big hack, tweaked in a totally ad-hoc way. The
"subject extraction and matching" is broken: it was originally done to match 
ALL UPPERCASE subjects, but several changes have moved the match in a
case-insensitive rule, so it doesn't work any more�and I've been too lazy to
fix it.

> > perl script written in a fairly ugly way (to my taste at least), someone has
> Well, my current setup is a sh script :-(

Digging in a backup of an accidentally lost mailbox, I've found the reference
to ifile ftp://syrinx.res.cmu.edu/pub/ifile/.


        Stefan