1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
| BEGIN {
| link_re="\"(http|file|https|ftp|irc|mailto):[^#\"]*$"
| }
|
| /Table of Contents/ {
| in_toc=1
| print $0
| next
| }
|
| in_toc && /^([ \t]*[0-9]\.|$)/ {
| print $0
| next
| }
|
| in_toc {
| in_toc=0
| }
|
| $0 ~ link_re {
| i = match($0, link_re)
| print substr($0, 1, i - 1)
| unfinished_url=substr($0, i)
| next
| }
|
| unfinished_url && /"/ {
| sub(/^[ \t]*/,"")
| print unfinished_url$0
| unfinished_url=0
| next
| }
|
| unfinished_url {
| sub(/^[ \t]*/,"")
| unfinished_url=unfinished_url$0
| next
| }
|
| /^[0-9]\.[0-9.]*/ {
| title=$0
| next
| }
|
| title && /^[ \t]*$/ {
| print ""
| print title
| gsub(/./, "-", title)
| print title
| print $0
| title=0
| next
| }
|
| title {
| print title
| print $0
| title=0
| next
| }
|
| {
| print $0
| }
|
|
