raport_końcówek.sh 803 Bytes
set -e
cat resources/sgjp_gen.tab | sed 's/:s[0-9]*//g' | grep -v '[-’]' | grep -v '[^\s]*ów\s' | grep -v '[^\s]*[iy]ch\s' | grep -v '\s.*ie[clr]\s' | grep -v '[^\s]*yj\s' | grep -v '[^\s]*ij\s' | grep -v '\s.*[yię]\s' | grep -v '\s.*in\s' | grep -v '\s.*u[ms]\s' > resources/sgjp_tmp_gen.tab
cat resources/sgjp_dat.tab | sed 's/:s[0-9]*//g' | grep -v '[-’]' | grep -v '\s.*ie[clr]\s' | grep -v '[^\s]*yj\s' | grep -v '[^\s]*ij\s' | grep -v '\s.*[yię]\s' | grep -v '\s.*in\s' | grep -v '\s.*u[ms]\s' > resources/sgjp_tmp_dat.tab
sbcl --noinform --script wygłos_rzeczown.lisp
cat resources/sgjp_tmp_końcówki_gen.tab resources/sgjp_tmp_końcówki_dat.tab | sort | uniq -c | sort -rn | grep -v 'wyjątek' | sed 's/^ *//g' | sed 's/ /\t/g' > resources/końcówki_raport.tab
rm resources/sgjp_tmp*