|
0
|
1 #!/bin/zsh
|
|
|
2
|
|
|
3 . ./_init.sh
|
|
|
4
|
|
|
5 print "insert fronts, page 1 first: "
|
|
|
6 read
|
|
|
7 OUT=scan.%02d.png START_PAGE=1 INCR_PAGE=2 SOURCE=ADF ${SCAN}
|
|
|
8
|
|
|
9 print "insert backs, last page first: "
|
|
|
10 read
|
|
|
11 OUT=scan.%02d.back.png START_PAGE=2 INCR_PAGE=2 SOURCE=ADF ${SCAN}
|
|
|
12
|
|
|
13 paste \
|
|
|
14 =(ls -1 scan*.back.png) \
|
|
|
15 =(ls -1r scan*.back.png) \
|
|
|
16 | perl -lpe '@_=split; $_[1]=~s/\.back//; $_="mv $_[0] $_[1]"' \
|
|
|
17 | sh
|
|
|
18
|
|
|
19 for x (scan.*.png) {
|
|
|
20 gm convert -units PixelsPerInch -resample 150x150 -quality 90 $x $x:r.jpg
|
|
|
21 }
|
|
|
22 gm convert scan.*.jpg scan.pdf
|
|
|
23
|
|
|
24 scp scan.pdf ditto:/opt/paperless/consume/scan-`date +%s`.pdf
|
