#!/bin/sh
echo Content-type: text/plain
echo
#echo Query is "$QUERY_STRING"
ITEM_NAME=`echo "$QUERY_STRING"|
 sed '/search=/s/search=\([^&]*\)/\1/' |
 /u/faculty/dick/bin/urlunencode`
# echo Item is "<$ITEM_NAME>"
case x"$ITEM_NAME" in
x) echo Please supply a query: names, subjects, a SUBJECT or an Item_Name;;
xhelp) echo "Four request types are handled: bib?names bib?subjects"
	echo "      bib?SUBJECT  bib?item_name";;
xname*) echo "Names"
	grep "^\. " /ftp/pool/u/faculty/dick/ftp/newbib.mth ;;
xsubject*) echo "Subjects"
	grep "^\. " /ftp/pool/u/faculty/dick/ftp/newsubjects.mth ;;
*)
	echo "Subject $ITEM_NAME"
sed -n "/^\. $ITEM_NAME/,/^\. /p"  /ftp/pool/u/faculty/dick/ftp/newsubjects.mth|sed -n '$!p'
	echo "Item $ITEM_NAME"
sed -n "/^\. $ITEM_NAME/,/^\.Close\.Set/p"  /ftp/pool/u/faculty/dick/ftp/newbib.mth
	echo "--------------------";;
esac