scripts/docstats to count words in article content

Author: osfameron

scripts/docstats

@@ -0,0 +1,22 @@
+#!/bin/bash
+
+echo "Word counts of all <article> content:"
+echo =============
+echo
+
+for dir in build/*/*/
+do
+  WC=$(
+    find $dir \
+      -name '*.html' \
+      -exec scripts/hwc {} ';' \
+      | perl -ne '$SUM += $_; END { print "$SUM\n" }' )
+
+  if [[ -n "$WC" && "$WC" -gt 0 ]]; then
+    echo $dir
+    echo $WC
+  fi  
+done
+
+echo
+

scripts/hwc

@@ -0,0 +1,3 @@
+#!/bin/bash
+
+htmlq -t -f $1 article | wc -c