Return to spelltell.sh CVS log

Up to [Research Unix] / researchv10dc / cmd / wwb

Annotation of researchv10dc/cmd/wwb/spelltell.sh, revision 1.1

1.1     ! root        1: # NOTICE-NOT TO BE DISCLOSED OUTSIDE BELL SYS EXCEPT UNDER WRITTEN AGRMT
        !             2: L=/usr/lib/style
        !             3: for i in $*
        !             4:        do case $i in
        !             5:        -ver) echo $0 version 2.0:: 2.0;exit;;
        !             6:        -flags) echo $0 \[-flags\] \[-ver\] \[wordpart \| regular expression ...\];exit;;
        !             7:        -*) echo unknown spelltell flag $i;exit;;
        !             8:        esac
        !             9: done
        !            10: if test $# = 0
        !            11: then   echo Do you want instructions? \(y or n\)
        !            12:        read ans
        !            13:        if      test \( $ans = 'y' -o $ans = 'Y' -o $ans = 'yes' -o $ans = 'Yes' \)
        !            14:        then echo '
        !            15: This command uses the grep command to search a dictionary 
        !            16: for the word you are interested in.  When you get a ">" 
        !            17: you can  type either:
        !            18:         1) any contiguous letters that you are sure 
        !            19:                of in the word
        !            20:                 example: for "accommodate" you could use:
        !            21:                         ac
        !            22:                         acc
        !            23:                         accom
        !            24:                         date, etc.
        !            25:         2) a grep pattern specifying what you know of the word
        !            26:                 example: for accommodate
        !            27:                         accomm.date
        !            28:                         ^acc
        !            29:                         accom*.date, etc.
        !            30: 
        !            31: After your last phrase, type q (for quit).
        !            32: You can also run this program by typing:
        !            33: '
        !            34: echo "         spelltell 'phrase1'   'phrase2' ..."
        !            35:        fi
        !            36:        while echo -e ">\c"; read ans
        !            37:        pat=`echo $ans|tr  -d \"\' `
        !            38:        if test \( "$pat" = 'q' -o "$pat" = '.' -o "$pat" = '' \)
        !            39:        then exit
        !            40:        fi
        !            41:        do grep $pat $L/spelllist.d
        !            42:        done
        !            43: else
        !            44:        while test "$1"
        !            45:                do
        !            46:                        grep $1 $L/spelllist.d
        !            47:                        shift
        !            48:                done
        !            49:        exit
        !            50: fi

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.