BEGIN {
print ""
print ""
print ""
level = 1
}
/ (.*) <\/H.>/ {
newlevel = $0
gsub( //, "", newlevel )
file = $0
gsub( / (.*) <\/H.>/, "", file )
if( file == "Index_of_Topics" ) {
next
}
title = $0
gsub( / /, "", title )
gsub( / <\/H.>/, "", title )
gsub( /\ \;/, "", title )
newlevel = newlevel + 0
if( newlevel < level ) {
while( newlevel < level ) {
print "
"
level--
}
} else if( newlevel > level ) {
print ""
level = newlevel
}
print "- "
}
END {
while( level > 0 ) {
print "
"
level--
}
print ""
}