Delete mail in queue from: or to: specific e-mail address

mailq-purge.sh

#!/bin/bash

if [ -z $1 ]; then
  echo "Usage: $0 [email protected]"
  exit
fi

rcpt=$1
QIDS=`mailq | grep -B1 "$rcpt" | grep '^[a-z]'  | awk  '{print $1}' | sed  's/\*$//'`
for q in $QIDS
do
  echo "Deleting $q"
  qtool.pl -C /etc/mail/sendmail.cf -d /var/spool/mqueue/$q
done