diff --git a/src/freq01.sh b/src/freq01.sh
new file mode 100755
index 0000000..74ed167
--- /dev/null
+++ b/src/freq01.sh
@@ -0,0 +1,3 @@
+#!/bin/bash
+set -eu
+LC_ALL=C egrep -o "[a-zA-Z]+" "$1" | tr '[:upper:]' '[:lower:]' | awk '{a[$1]++} END {for(k in a) print a[k], k}' | sort -k1,1rn -k2,2 > "$2"