spaf@gatech.UUCP (Gene Spafford) (03/22/84)
I've had numerous requests for the scripts I used to produce the list
of Usenet sites sorted by organization name. Rather than continue to
send out individual copies, I'm posting them here (net.news.map) and in
net.sources. If I already mailed you a copy, you might wish to compare
what I mailed you with this posted version -- I have fixed a couple of
minor bugs since I mailed out copies to the first few requesters.
To produce the list, you need to run the following 1 line shell script
in a directory containing the most recent version of the map from
net.news.map:
awk -f list.awk usa.* eur.* can.* aus.* | sort -bdf +1 +0 -1
What follows is the contents of the "list.awk" script:
$1 == "Name:" {name = $2
flag = 0
next}
$1 ~ /Org/ {len = index ($0, ":") + 2
org = substr ($0, len, length($0) - len + 1)
flag = 1
next}
$1 ~ /Con/ {printf "%10s\t%s\n", name, org
org = ""
flag = 0
next}
flag == 1 {len = index ($0, $1)
org = org " " substr ($0, len, length($0) - len + 1)
next}
--
Off the Wall of Gene Spafford
The Clouds Project, School of ICS, Georgia Tech, Atlanta GA 30332
CSNet: Spaf @ GATech ARPA: Spaf.GATech @ CSNet-Relay
uucp: ...!{akgua,allegra,rlgvax,sb1,unmvax,ulysses,ut-sally}!gatech!spaf