bee.sh

#!/bin/sh
# bee - return Spelling Bee words from maximal set
# Andrew Ho <andrew@zeuscat.com>

ME=`basename "$0"`
USAGE="usage: $ME letters middle-letter"
die_usage() { (echo "$ME: $@"; echo "$USAGE") 1>&2; exit 1; }

letters="$1"
[[ -z "$letters" ]] && die_usage 'missing required letters'
middle="$2"
[[ -z "$middle" ]] && die_usage 'missing required middle letter'

pcregrep -hi "^[$letters]{4,}$" \
         ~/work/wordchomp/ospd3.txt \
         /usr/share/dict/words |
    fgrep -i "$middle" |
    sort -fu |
    awk '{ print length, $0 }' |
    sort -n |
    cut -d' ' -f2-