diff --git a/smtp_tls_stats.sh b/smtp_tls_stats.sh
new file mode 100755
index 0000000..175ed2e
--- /dev/null
+++ b/smtp_tls_stats.sh
@@ -0,0 +1,11 @@
+#!/usr/bin/env bash
+# Author:  Oliver Ladner <oli@lugh.ch>
+# License: LGPL
+#
+# greps mail.log for TLS debug loglines and displays sender count
+# and cipher used.
+
+MIN_MAILS=2
+echo -e "Count\tCipher used\tSending domain"
+echo "--------------------------------------"
+grep 'Anonymous TLS connection established from' /var/log/mail.log | sed -r 's/\[[0-9.]*\]://g' | awk {'print $15,$11'} | sort | uniq -c -i | while read line; do [[ $(grep -oE '^\s*[0-9]+' <<< $line) -gt $MIN_MAILS ]] && echo $line | tr -s ' ' '\t'; done | sort -k 2,2 -k 1,1rn