pocm@mega.ist.utl.pt (Paulo Jorge O. C. Matos) writes:

> I'm subscribed to dozens of mailing lists and I have an email
> account through which I receive all my mailing list mails. Is
> there a way to split the mail from that account automatically
> based on the mailing list headers?

I solved this one with procmail myself (I grok procmail more than I do
lisp[1]).

A portion of ~/.procmailrc follows...
*start*
############################## 
#
# Dynamic Mail filters The following set of rules use the matching
# ability of procmail to dynamically filter mail based on parsing one
# of the possible mailing list headers.  This means you can subscribe
# to new mailing lists without having to add lines to your procmail
# filters.  Very Good Thing (tm).  When I first found this list, I
# think there were 4 entries.  I add a new entry every time some new
# mailing list ends up in my inbox (i.e. it is not covered by the
# current ruleset.)  Comments appear where I can remember them.

#  Used by the perl6-all list to break out into seperate mailboxes
:0:
* ^X-Mailing-List-Name: \/[^@]+
`echo $MATCH | sed -e 's/[\/]/_/g'`

#  Majordomo uses Sender header to tell when it is coming from
:0:
* ^Sender: owner-\/[^@]+
`echo $MATCH | sed -e 's/[\/]/_/g'`

:0:
* ^Delivered-To: mailing list \/[^@]+
`echo $MATCH | sed -e 's/[\/]/_/g'`

:0:
* ^X-Mailing-List: <\/[^@]+
`echo $MATCH | sed -e 's/[\/]/_/g'`

:0:
* ^X-Loop: \/[^@]+
`echo $MATCH | sed -e 's/[\/]/_/g'`

:0:
* ^X-List-ID: <\/[^@\.]+
`echo $MATCH | sed -e 's/[\/]/_/g'`

:0:
* ^X-list: \/[^@\.]+
`echo $MATCH | sed -e 's/[\/]/_/g'`

:0:
* ^X-BeenThere: \/[^@]+
`echo $MATCH | sed -e 's/[\/]/_/g'`

*end*

Hope this helps...




[1] If I futz around with lisp for too long, I start getting the same
sort of frustrated, pissed off mood I get when some idiot beeps my
headset two minutes before the system stop taking any more incoming
calls, meaning I'm going to be the last out of the office just because
the putz couldn't sleep on it a few hours for the early-bird shift to come
in...

-- 
Paul Johnson
<baloo@ursine.ca>
Linux.  You can find a worse OS, but it costs more.