V10/cmd/wwb/wwbhelp.sh

# NOTICE-NOT TO BE DISCLOSED OUTSIDE BELL SYS EXCEPT UNDER WRITTEN AGRMT
L=/usr/lib/style
for i in $*
	do case $i in
		-ver) echo $0 version 2.0:: 2.0;exit;;
		-flags) echo $0 \[-ver\] \[-flags\] \[word or part of word ..\];exit;;
		-*) echo unknown wwbhelp flag $i;exit;;
	esac
done
if test $# = 0
then
	echo -e 	'When you see the ">" sign, type the word you wish to have
more information for.  When you wish to stop, type q.

If no information appears, either your word is misspelled or
it is not included in the help file.\n'
	while echo -e ">\c";read word
		if test \( "$word" = 'q' -o "$word" = '.' -o "$word" = '' \)
		then 	exit
		fi
		do
			worduncap=`echo $word|tr [A-Z] [a-z]`
                        grep "$worduncap" $L/helplist.d
		done
else 	echo -e 'If no information appears, either your word is misspelled or
it is not included in the help file.\n'
	while test "$1"
		do
        		worduncap=`echo $1|tr [A-Z] [a-z]`
                        grep "$worduncap" $L/helplist.d
			shift
		done
	exit
fi