ejo@ims.alaska.edu (Eric Olson) (01/25/91)
There was a program posted to alt.sources a short while ago which produced a calendar of the current month. I'd like to get that again, but I can't get it from my news server and I don't know of any alt.sources archives (and I don't remember the subject line in any case). Did anyone else happen to save a copy of that? If so, I'd greatly appreciate a copy via email! Eric Olson <ejo@ims.alaska.edu> Gryphon Gang Fairbanks AK 99775
emv@ox.com (Ed Vielmetti) (01/25/91)
In article <1991Jan25.022822.460@ims.alaska.edu> ejo@ims.alaska.edu (Eric Olson) writes: produced a calendar of the current month. I'd like to get that again, but I can't get it from my news server and I don't know of any alt.sources archives (and I don't remember the subject line in any case). Did anyone else happen to save a copy of that? If so, I'd echo "prog alt.sources" | rsh quiche.cs.mcgill.ca -l archie "" #! /bin/sh # Date: Sat, 29 Dec 1990 17:31:41 -0500 # From: cedman@golem.ps.uci.edu (Carl Edman) # Subject: [comp.unix.shell] A one-liner to find files in archive servers # Newsgroups: comp.archives # A little one-line script to call up archie, get the list of all files specified # by the regular expression which is the first argument, sort these files by age # and display them echo "prog $1" | rsh quiche.cs.mcgill.ca -l archie "" | awk '/Host/ { host = $2; } /Last/ { cury = $6; } /Location:/ { dir = $2; } $0 ~ /FILE/ || $0 ~ /DIRECTORY/ { if (index($6, ":")) year = cury; else year = $6; printf "%3s %2s %4s %7s /%s:/%s/%s\n", \ $4, $5, year, $3, host, dir, $7; }' | sort +2nr -3 +0Mr -1 +1nr -2 # echo "prog $1" | rsh quiche.cs.mcgill.ca -l archie "" | awk "/Host/ { host = \$2 } /Last/ { cury = \$6 } /Location:/ { dir = \$2 } /FILE/||/DIRECTORY/ { if (index(\$6,\":\")) year = cury; else year = \$6; printf \"%3s %2s %4s %7s /%s:/%s/%s\\n\",\$4,\$5,year,\$3,host,dir,\$7 } { next }" - | sort +2nr -3 +0Mr -1 +1nr -2