tutes-dump/bin/perlsubstitutions.sh

18 lines
597 B
Bash

#/usr/bin/bash
#These were run one at a time, but keeping record to be reconstitutable by running against original dump folder
#remove front half of bad leftover anchor links
for i in *.html.docuwiki; do perl -pi -e "s/\[\[\|//g" $i; done
#remove back half of bad leftover anchor links
for i in *.html.docuwiki; do perl -pi -e "s/\]\] =/ =/g" $i; done
#de-escape >
for i in *.html.docuwiki; do perl -pi -e "s/>/>/g" $i; done
#de-escape <
for i in *.html.docuwiki; do perl -pi -e "s/&lt;/</g" $i; done
#de-escape &amp;
for i in *.html.docuwiki; do perl -pi -e "s/&amp;/\&/g" $i; done