KW

#! usr/bin/bash
zgrep "^KW" $1 | cut -c 6- | tr ";" "\t" | tr -d "." > file
name=$(echo $1 | cut -c 1-11)
touch "$name"_KW.txt
for ((i=1;i<8;i++))
do
        cut -f $i file >> "$name"_KW.txt
done
sed -r "s/^ *//g" "$name"_KW.txt | sort | sed -e '/^ *$/d' | uniq -c | sort -rh > "$name"_KWs.txt
rm file
rm "$name"_KW.txt