ref: 3866717cbb020199d58171c1c0cdd7382a74ee82
dir: /man/lib/secindex/
#!/bin/rc U='ABCDEFGHIJKLMNOPQRSTUVWXYZ' L='abcdefghijklmnopqrstuvwxyz' builtin cd $1 for (i in [a-z0-9:]*) { sed -n ' /SH *NAM/,/SH/{ /SH/d s/, *$// ty :y s/ *\\*-.*// tx s/ *\\\(mi.*// tx s/[,:] */\ /g s/\n\\n/\ /g y/'$U'/'$L'/ s/\n/ '$i'&/g s/$/ '$i'/ p } /SH *DES/q d :x s/ *\\*-.*// s/ *\\\(mi.*// /^$/d s/[,:] */\ /g s/\n\n/\ /g y/'$U'/'$L'/ s/\n/ '$i'&/g s/(.|\n)*$/& '$i'/ p q ' $i kw=`{echo $i | sed 's/0intro/intro/'} echo $kw $i } | sort -u