clearing a mail queue

for f in ` mailq |grep hostname.com -B 2 |grep ^[A-Z0-9]|awk '{print $1}'` ; do postsuper -d $f; done