[net.sources] lbgm toc awk script

barto@celerity.UUCP (David Barto) (12/29/84)

: 'use sh not csh'
cat > README <<'ENDOFREADME'
This is a simple program which will show the filename and the
subject line.

	Ends with "End of Distribution"
	has exit 0 for the signature.....

Hea - it ain't great, but it works.
ENDOFREADME
cat > lbgmtoc <<'ENDOFlbgmtoc'
#! /bin/sh
: 'archdir [ARCHIVE [LOGFILE]]
* use this to print out a simple table of contents for the
* lbgm archive'

ARCHIVE=/user/lbgm
LOGFILE=save.log
case $# in
	1)	ARCHIVE=$1
		;;
	2)	ARCHIVE=$1
		LOGFILE=$2
		;;
	*)	echo "Usage: $0 [ARCHIVE [LOGFILE]]" 2>&1
		exit 1
		;;
esac

cd $ARCHIVE

awk 'BEGIN { file="" }
	/^Jan_|^Feb_|^Mar_|^Apr_|^May_|^Jun_/ {file = $0}
	/^Jul_|^Aug_|^Sep_|^Oct_|^Nov_|^Dec_/ {file = $0}
	/^	Subject/	{print file $0}' $LOGFILE
ENDOFlbgmtoc
echo "End of Distribution"
exit 0
-- 
David Barto		      akgua!celerity!barto
{decvax || ucbvax || ihnp4}!sdcsvax!celerity!barto
"If you are using more than 7 sites to get here, you are taking the long way"