File: get-wiki-docs

package info (click to toggle)
tcl-sugar 0.1-1
  • links: PTS
  • area: main
  • in suites: buster, jessie, jessie-kfreebsd, stretch
  • size: 176 kB
  • ctags: 29
  • sloc: tcl: 647; sh: 13; makefile: 2
file content (18 lines) | stat: -rwxr-xr-x 453 bytes parent folder | download | duplicates (2) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
#!/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)