iterate through postfix queue and selectively delete entries

postfix_iter_queue_delete.sh

#!/usr/bin/env bash
set -euo pipefail
IFS=$'\n\t'


mapfile -t ids < <(mailq | grep -E '^[0-9A-F]' | awk '{print $1}')
for id in "${ids[@]}"; do
   postcat -q "${id}" | less
   echo "Remove? (y)"
   read -r RM
   RM=$(echo "${RM}" | tr '[:upper:]' '[:lower:]')
   if [[ "${RM}" = "y" ]]; then
      echo "Deleting ${id}"
      postsuper -d "${id}"
   fi
done