Add scripts/pdftops-noduplex from zealot

[ian-dotfiles.git] / scripts / pdftops-noduplex

diff --git a/scripts/pdftops-noduplex b/scripts/pdftops-noduplex
new file mode 100755 (executable)
index 0000000..2bc525a
--- /dev/null
+++ b/scripts/pdftops-noduplex
@@ -0,0 +1,7 @@
+#!/bin/bash
+set -e
+pdftops "$1" "$2"
+perl -i~ -pe '
+     next unless m/^\%\%BeginResource: procset xpdf /..m/^\%\%EndResource/;
+     s# /Duplex true def # #;
+' "$2"