#!/bin/sh

resolve_wiki_name () {
    wget -O/dev/null http://wiki.tcl.tk/$1 2>&1 | grep -o http.\* | tail -n1
}

HOMEURL=http://wiki.tcl.tk/11155

mkdir -p debian/tutorial
cd debian/tutorial
rm -f *.txt
for d in $(wget $HOMEURL.txt -O- 2>/dev/null | sed -n -e '/Section /{s/.*\[\(.*\)\].*/\1/;s/ /_/g;p}')
do
    echo Receiving $d.txt >&2
    wget $(resolve_wiki_name $(echo $d | tr _ +)).txt -O$d.txt 2>/dev/null 
done

rm -f $(basename $HOMEURL.txt)
