1#!/bin/rc 2U='ABCDEFGHIJKLMNOPQRSTUVWXYZ' 3L='abcdefghijklmnopqrstuvwxyz' 4builtin cd $1 5for (i in [a-z0-9:]*) { 6 sed -n ' 7 /SH *NAM/,/SH/{ 8 /SH/d 9 s/, *$// 10 ty 11 :y 12 s/ *\\*-.*// 13 tx 14 s/ *\\\(mi.*// 15 tx 16 s/[,:] */\ 17/g 18 s/\n\\n/\ 19/g 20 y/'$U'/'$L'/ 21 s/\n/ '$i'&/g 22 s/$/ '$i'/ 23 p 24 } 25 /SH *DES/q 26 d 27 :x 28 s/ *\\*-.*// 29 s/ *\\\(mi.*// 30 /^$/d 31 s/[,:] */\ 32/g 33 s/\n\n/\ 34/g 35 y/'$U'/'$L'/ 36 s/\n/ '$i'&/g 37 s/(.|\n)*$/& '$i'/ 38 p 39 q 40' $i 41kw=`{echo $i | sed 's/0intro/intro/'} 42echo $kw $i 43} | sort -u 44