#!/bin/sh
cat $1 | perl -p -i -e 's/\%instiki\:(.*)/$1/' | perl -p -i -e 's/.*\%noinstiki(.*)\n/$1%\n/' | perl -p -i -e 's/(.*[a-zA-Z0-9].*)\%/$1/' | grep -v '^%' | perl -p -i -e 's/\\chapter\{(.*)\}/\# $1 \#/g' | perl -p -i -e 's/\\section\{(.*)\}/\#\# $1 \#\#/g' | perl -p -i -e 's/\\subsection\{(.*)\}/\#\#\# $1 \#\#\#/g'  | perl -p -i -e 's/\\begin\{equation\*{0,1}\}/\\\[/g' | perl -p -i -e 's/\\end\{equation\*{0,1}\}/\\\]/g' | perl -p -i -e 's/\\begin\{align\*{0,1}\}/\\\[\n\\begin\{split\}/g' | perl -p -i -e 's/\\end\{align\*{0,1}\}/\\end\{split\}\n\\\]/g' | perl -p -i -e 's/\\label\{eq\:(.*)\}/\\label\{$1\}/g' | perl -p -i -e 's/\(\\ref\{(eq:[0-9a-zA-Z_-]*)\}\)/\($1\)/g'| perl -p -i -e 's/\\eqref\{(eq:[0-9a-zA-Z_-]*)\}/\($1\)/g' |  perl -p -i -e 's/\\\~n/\~n/g' | perl -p -i -e 's/\\nonumber//g'| perl -p -i -e 's/\~/ /g' | perl -p -i -e "s/\\\\i /i/g" | perl -p -i -e 's/\~/ /g' | perl -p -i -e "s/\\\\i /i/g" | perl -p -i -e "s/\\\'a /á /g" | perl -p -i -e "s/\\\'e /é /g" | perl -p -i -e "s/\\\'i /í /g" | perl -p -i -e "s/\\\'o /ó /g" | perl -p -i -e "s/\\\'u /ú /g" | perl -p -i -e "s/\\\'a/á/g" | perl -p -i -e "s/\\\'e/é/g" | perl -p -i -e "s/\\\'i/í/g" | perl -p -i -e "s/\\\'o/ó/g" | perl -p -i -e "s/\\\'u/ú/g" | perl -p -i -e 's/\#\#\n$/\#\#/g' | perl -p -i -e 's/\#\#\s+\n$/\#\#/g' | perl -p -i -e 's/\#\#([a-zA-Z0-9])/\#\#\n$1/' | perl -p -i -e 's/\#\#\\label\{chap:([a-zA-Z0-9_-]*)\}/\#\#  \{\#$1\}/' | perl -p -i -e 's/\#\#\\label\{sec:([a-zA-Z0-9_-]*)\}/\#\#  \{\#$1\}/' | perl -p -i -e 's/\\ref\{sec:([a-zA-Z0-9_-]*)\}/\[$1\]\(\#$1\)/g' | perl -p -i -e 's/\\ref\{chap:([a-zA-Z0-9_-]*)\}/\[$1\]\(\#$1\)/g' | perl -p -i -e  's/\\cite\{([a-zA-Z0-9_-]*)\}/\(\[$1\]\(\/wiki\/show\/Referencias\#$1\)\)/g'| perl -p -i -e  's/\\cite\{([a-zA-Z0-9_-]*\:[a-zA-Z0-9_-]*)\}/\(\[$1\]\(\/wiki\/show\/Referencias\#$1\)\)/g' | perl -p -i -e 's/\\emph\{(([a-zA-Z0-9-&;]*\s{0,1}[a-zA-Z0-9-&;]*)*)\}/\_$1\_/g' | perl -p -i -e 's/\\\item/*/' | perl -p -i -e 's/\\\ /\\;\\;/g' | perl -p -i -e 's/\\\qquad/\\;\\;\\;\\;/g'
#abreviada
#cat kk.tex | grep -v '^%' | perl -p -i -e 's/\\chapter\{(.*)\}/\#\# $1 \#\#/g' | perl -p -i -e 's/\\section\{(.*)\}/\#\#\# $1 \#\#\#/g' | perl -p -i -e 's/\\subsection\{(.*)\}/\#\#\#\# $1 \#\#\#\#/g'  | perl -p -i -e 's/\\begin\{equation\*{0,1}\}/\\\[/g' | perl -p -i -e 's/\\end\{equation\*{0,1}\}/\\\]/g' | perl -p -i -e 's/\\begin\{align\*{0,1}\}/\\\[\n\\begin\{split\}/g' | perl -p -i -e 's/\\end\{align\*{0,1}\}/\\end\{split\}\n\\\]/g' | perl -p -i -e 's/\\label\{eq\:([0-9a-zA-Z-_]*)\}/\\label\{$1\}/g' | perl -p -i -e 's/\(\\ref\{(eq:[0-9a-zA-Z-_]*)\}\)/\($1\)/g'| perl -p -i -e 's/\\eqref\{(eq\:[0-9a-zA-Z-_])\}/\($1\)/g'|  perl -p -i -e 's/\\\~n/\~n/g' | perl -p -i -e 's/\~/ /g' | perl -p -i -e "s/\\\\i /i/g" 



#acentos
#| perl -p -i -e "s/\\\'a /á /g" | perl -p -i -e "s/\\\'e /é /g" | perl -p -i -e "s/\\\'o /ó /g" | perl -p -i -e "s/\\\'u /ú /g" | perl -p -i -e "s/\\\'a/á/g" | perl -p -i -e "s/\\\'e/é/g" | perl -p -i -e "s/\\\'i/í/g" |perl -p -i -e "s/\\\'o/ó/g" | perl -p -i -e "s/\\\'u/ú/g"