rednp | 10 ++++++++++

diff --git a/rednp b/rednp
new file mode 100755
index 0000000000000000000000000000000000000000..14368800bb8e2a95230c162ea5d2b9d58d95e460d61680e466159dc814f73b47
--- /dev/null
+++ b/rednp
@@ -0,0 +1,10 @@
+#!/bin/sh -e
+
+sed -n '2,$p' <dnp.log |
+perl -lane 'print $F[$#F] unless $F[6] eq "0"' |
+while read w ; do
+    w=${w%\'}
+    w=${w#\'}
+    ../cmd/download-clean $w
+    ../cmd/dnp $w || echo "still failed: $w"
+done