1 #! /bin/sh
2 case $1 in
3 *.html)
4 perl -i -0777 -p -e 's/^\s*//' $1
5 tidy -latin1 -wrap 0 -q -asxhtml $1 >$1.fixed 2>$1.report
6 if [ $? != 0 ]; then
7 echo Parsing: $1
8 egrep -v "^(HTML Tidy|$1:|To learn|Please send|HTML and CSS|Lobby your)" $1.report
9 rm $1.report
10 name=`basename $1 .html`
11 name=`basename $name .en`
12 name=`basename $name .de`
13 touch -m -t 198001010000 $name.*.html
14 exit 1
15 fi
16 mv $1.fixed $1
17 rm $1.report
18 ;;
19 esac