if [ "$#" -eq 0 ]; then
  >&2 echo "Napaka: skripta potrebuje en ali dva argumenta." && exit 1
fi
if ! [[ -d $1 ]]; then
  >&2 echo "Napaka: neveljaven imenik." && exit 2
fi
declare -A shramba_lokacij
st_lokacij=0
if [ "$#" -eq 2 ]; then
  n=$2
else
  n=100
fi
find $1 -name "*.shr" > shrambe
for i in $(seq 1 $(cat shrambe |wc -l)); do
    filename=$(cat shrambe | head -n $i | tail -n 1)
    lokacija=$(basename "$filename")
    lokacija=${lokacija/.shr/}
    besede=($(cat "$filename"))
    lesnikov=0
    for (( i=1; i < ${#besede[@]}; i++ )); do
      if [[ ${besede[$i]} == "lešnik"* ]]; then
        stevilka='^[0-9]+$'
        if [[ ${besede[$i-1]} =~ $stevilka ]]; then
          lesnikov=$((lesnikov + ${besede[$i-1]}))
        fi
      fi
    done
    shramba_lokacij[$lokacija]=$((shramba_lokacij[$lokacija]+lesnikov))
done
for element in "${!shramba_lokacij[@]}"; do
  echo "$element:${shramba_lokacij[$element]}"
done | sort -t":" -k2nr -k1 | head -n $n