Batch compress PDF files like invoices (especially made for timologio by AADE that produces huge files)

pdfcompress.sh

#! /bin/bash

for f in *.pdf
do
  fbname=$(basename "$f" .pdf)
  fbname_safe="${fbname// /_}"
  mv "$fbname".pdf $fbname_safe.temp.pdf
  gs -sDEVICE=pdfwrite -dCompatibilityLevel=1.4 -dPDFSETTINGS=/screen -dNOPAUSE -dQUIET -dBATCH -sOutputFile=$fbname_safe.pdf $fbname_safe.temp.pdf
  # To also change PDF title (untested):
  # gs -sDEVICE=pdfwrite -dCompatibilityLevel=1.4 -dPDFSETTINGS=/screen -dNOPAUSE -dQUIET -dBATCH -sOutputFile=$fbname_safe.pdf $fbname_safe.temp.pdf -c "[ /Title (My New Title) /DOCINFO pdfmark"
  rm $fbname_safe.temp.pdf
done