Want to delete all postfix messages in the queue that are older than todays date?

mailq | grep -e "^[A-Z0-9]" | grep -v "`date | awk '{print $1,$2,$3}'`" | awk '{print $1}' | sed 's/\*//' | postsuper -d -