Path: utzoo!utgpu!water!watmath!clyde!att!osu-cis!killer!pollux!dalsqnt!rpp386!jfh
From: jfh@rpp386.Dallas.TX.US (The Beach Bum)
Newsgroups: news.admin
Subject: A solution to the dilemma
Summary: ... or how to cancel portal articles with one command
Message-ID: <6818@rpp386.Dallas.TX.US>
Date: 19 Sep 88 01:55:08 GMT
References: <6817@rpp386.Dallas.TX.US>
Reply-To: jfh@rpp386.Dallas.TX.US (The Beach Bum)
Distribution: world,!to.portal
Organization: HASA, "S" Division
Lines: 36


there is little need to speak harshly of a system and its users if
one is not willing to act in an equally harsh manner.  to this end,
i have created a little shell script which seeks out portal postings
and cancels them.

i am posting it here to news.admin knowing that many of you will
be tempted to actually use it.  it has been tested and it works
wonderfully.  you should use it as well.  just run this sucker
once a day, and your life will be relatively free of portal-people.
i suggest you run it in the morning.  before you eat anything.

- john.
--------------------- cut here ---------------------
cd /usr/spool/news

if [ ! -f before ]
then
	touch -am 0101000070 before
fi

touch now

find . -newer before -type f -print | \
   gethead 'From: ' | grep -y portal | \
   sed -e 's/:.*$//' | gethead 'Message-ID: ' | sed -e 's/.*-ID: //
s:^.*$:/usr/lib/news/inews -n control -c cancel & -d local:
s/[<>]/\\&/g' | sh

mv now before
--------------------- cut here as well ---------------
-- 
John F. Haugh II (jfh@rpp386.Dallas.TX.US)                   HASA, "S" Division

    "If the code and the comments disagree, then both are probably wrong."
                -- Norm Schryer