for i in `ls *.pdf|xargs`; do N=`pdfinfo $i|fgrep -m1 Title | sed -e 's/Title:\s*//' -e 's/[.,/\\!]//g' -e 's/\ /_/g'`; echo mv $i $N.pdf; done