Remove corrupt graphite carbon whisper files

gistfile1.sh

#!/bin/bash
options=('find' 'delete')
PS3='state your wish: '

echo -e "\nfind/delete corrupt whisper-files"

select opt in "${options[@]}"; do
  case $REPLY in
    [12] ) option=$opt; break;;
    * ) exit;;
  esac
done

if [ $option ]; then
  matches=()
  directory='/var/lib/carbon/whisper'

  for file in $(find $directory -type f -name '*.wsp' -print); do
    /usr/bin/whisper-info $file > /dev/null 2>&1
    retval=$?
    echo -en "\r\033[Kchecking $file"
    [ $retval -ne 0 ] && matches+=($file)
  done

  if [ $option == 'find' ]; then
    echo -en "\r\033[Klisting ${#matches[@]} corrupt files:\n"
    for file in "${matches[@]}"; do
      echo -e "- $file"
    done
  else
    echo -en "\r\033[Kdeleting ${#matches[@]} corrupt files:\n"
    for file in "${matches[@]}"; do
      sudo rm $file && echo -e "- $file"
    done
  fi
fi