From 273b76dcd2208b1ec892b19752d928cb5dce2246 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Sat, 11 Sep 2010 23:13:58 +0000 Subject: confproc 0.7 (6aug10) git-svn-id: svn://tug.org/texlive/trunk@19668 c570f23f-e606-0410-a88d-b1316a301751 --- .../doc/latex/confproc/removeLaTeXcmds.sh | 65 ++++++++++++++++++++++ 1 file changed, 65 insertions(+) create mode 100644 Master/texmf-dist/doc/latex/confproc/removeLaTeXcmds.sh (limited to 'Master/texmf-dist/doc/latex/confproc/removeLaTeXcmds.sh') diff --git a/Master/texmf-dist/doc/latex/confproc/removeLaTeXcmds.sh b/Master/texmf-dist/doc/latex/confproc/removeLaTeXcmds.sh new file mode 100644 index 00000000000..1f651b93648 --- /dev/null +++ b/Master/texmf-dist/doc/latex/confproc/removeLaTeXcmds.sh @@ -0,0 +1,65 @@ +#!/bin/bash + +# arg 0: path, arg 1: input file; arg 2: output file + +#-- save arguments for use +args=("$@") +path=${args[0]} +file=${args[1]} +outputfile=${args[2]} +cd ${path} +cp ${file} tmp.txt +#echo "__ ORIGINAL: $file ___" +#cat tmp.txt + +#echo " " +#echo "__ removed accents: __" +perl -p -i -e " s/\\\'e/e/g " tmp.txt +perl -p -i -e " s/\\'{e}/e/g " tmp.txt +perl -p -i -e " s/\\\`e/e/g " tmp.txt +perl -p -i -e ' s/\\"e/e/g ' tmp.txt +perl -p -i -e " s/\\\`{e}/e/g " tmp.txt +perl -p -i -e " s/\\\'a/a/g " tmp.txt +perl -p -i -e " s/\\\`a/a/g " tmp.txt +perl -p -i -e " s/\\\`{a}/a/g " tmp.txt +perl -p -i -e ' s/\\"{o}/oe/g ' tmp.txt +perl -p -i -e ' s/\\"o/o/g ' tmp.txt +perl -p -i -e ' s/\\o{}/o/g ' tmp.txt +perl -p -i -e ' s/\\\^o/o/g ' tmp.txt +perl -p -i -e " s/\\\'o/o/g " tmp.txt +perl -p -i -e " s/\\\`o/o/g " tmp.txt +perl -p -i -e " s/\\\'u/u/g " tmp.txt +perl -p -i -e ' s/\\u //g ' tmp.txt +perl -p -i -e ' s/\\"u/u/g ' tmp.txt +perl -p -i -e ' s/\\i /i/g ' tmp.txt +perl -p -i -e ' s/\\i/i/g ' tmp.txt +perl -p -i -e " s/\\\'{i}/i/g " tmp.txt +perl -p -i -e ' s/\\"{i}/i/g ' tmp.txt +perl -p -i -e ' s/\\c {c}/c/g ' tmp.txt + +#echo " " +#echo "__ removed textit, texbf, {, }: __" +perl -p -i -e ' s/\--/-/g ' tmp.txt +perl -p -i -e " s/\\ss/ss/g " tmp.txt +perl -p -i -e ' s/\\textsuperscript //g ' tmp.txt +perl -p -i -e " s/\\&/&/g " tmp.txt +perl -p -i -e ' s/\\mu/mu\:/g ' tmp.txt +perl -p -i -e ' s/\\sim\s//g ' tmp.txt +perl -p -i -e ' s/\\sim//g ' tmp.txt +perl -p -i -e ' s/\s:/:/g ' tmp.txt + +perl -p -i -e ' s/\$//g ' tmp.txt +perl -p -i -e " s/textit //g " tmp.txt +perl -p -i -e " s/textbf //g " tmp.txt +perl -p -i -e " s/\{//g " tmp.txt +perl -p -i -e " s/\}//g " tmp.txt +perl -p -i -e ' s/\`\`/"/g ' tmp.txt +perl -p -i -e " s/\'\'/\"/g " tmp.txt + +#echo " " +#echo "__ removed \: ___" +perl -pi -e 's/\\//g' tmp.txt +perl -pi -e 's/\s{2,10}\{\}/ /g' tmp.txt +perl -pi -e 's/\s{2,10}/ /g' tmp.txt + +cp tmp.txt $outputfile -- cgit v1.2.3