Wed 97-12-17 era eriksson <era(_at_)iki(_dot_)fi> list.procmail
| On 17 Dec 1997 09:38:36 +0200,
| <jari(_dot_)aalto(_at_)poboxes(_dot_)com> wrote:
| > I tolerate 3 big letter words, and if there is more, then
|
| How about, kill everything with more than two adjacent uppercase
| words?
Erm, I want to exludecertain words; like SMTP or AM
| :0BD
| * $ -$max^0
| * 1^1 ()\<[A-Z][A-Z][A-Z]+\>
| { ... go ballistic ... }
This is more like it. Thanks. I now use following recipe:
max = 3
:0 BD
*$ -$max^0 << tolerate this many caps words
* -1^1 ()(AM|SMTP|IP)\> << allowed words by -1
* 1^1 ()[A-Z][A-Z][A-Z]+\> << total caps words
{
...junk it to stellar orbit
}
jari