|
|
1.1 root 1: From [email protected] (Cheshire Chuqui) Tue Nov 27 13:21:24 1984 2: Relay-Version: version B 2.10.2 11/2/84; site seismo.UUCP 3: Posting-Version: version B 2.10.2 9/17/84 chuqui version 1.7 9/23/84; site nsc.UUCP 4: Path: seismo!nsc!chuqui 5: From: [email protected] (Cheshire Chuqui) 6: Newsgroups: net.wanted.sources 7: Subject: Re: local netnews usage statistics 8: Message-ID: <[email protected]> 9: Date: 27 Nov 84 18:21:24 GMT 10: Date-Received: 27 Nov 84 18:32:17 GMT 11: References: <> 12: Reply-To: [email protected] (Cheshire Chuqui) 13: Distribution: net 14: Organization: Plaid Heaven 15: Lines: 41 16: Summary: 17: In article <[email protected]> [email protected] (Richard Foulk) writes: 18: >Does anyone have some kind of utility that pokes around in peoples .newsrc 19: >files and produces meaningful (?) statistics on general news readership 20: >for that site? 21: 22: This is something Fred Blonder wrote a while back and passed around. It 23: does come in handy, especially if you are short on disk space and trying to 24: figure out what groups to shorten... 25: 26: 27: #! /bin/sh 28: # 29: # @(#)subscribers.sh (University of Maryland) Fred Blonder 19-Aug-1983 30: # 31: # Find out how many people subscribe to each newsgroup 32: 33: sub_tmp=/tmp/#s.$$ 34: 35: trap "rm -f $sub_tmp" 0 1 2 15 36: 37: for dir in `awk -F: '{ print $6 }' /etc/passwd | sort -u` 38: do # locate all login directories 39: if # if .newsrc exists 40: [ -r $dir/.newsrc ] 41: then # find all newsgroups subscribed to, append to $sub_tmp 42: awk -F: '/^net\..*: [0-9].*$/ { print $1 }' \ 43: $dir/.newsrc >> $sub_tmp 44: fi 45: done 46: 47: # Count all ocurrences of all newsgroups. 48: # Print result sorted by decreasing number of subscribers. 49: awk '{ x[$1] = x[$1] + 1 } \ 50: END { for (i in x) print i " " x[i] }' $sub_tmp | sort +1 -rn 51: 52: -- 53: >From the center of a Plaid pentagram: Chuq Von Rospach 54: {cbosgd,decwrl,fortune,hplabs,ihnp4,seismo}!nsc!chuqui [email protected] 55: 56: ~But you know, monsieur, that as long as she wears the claw of the dragon 57: upon her breast you can do nothing-- her soul belongs to me!~ 58: 59:
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.