Unix & Shell-Programmierung: HTML mit Tcl interpretieren |
<html>
<head>
<title>ein Test</title>
</head>
<body>
<h1>ein Test</h1>
<red>eine ganz wichtige Seite</red>
<hr>
<address>
<a href="mailto:theo@muehle.welt.all">[theo]</a>
</address>
</body>
</html> |
<(/?[a-zA-Z][-_:a-zA-Z0-9]*)(([
\r]+[a-zA-Z][-_:a-zA-Z0-9]*=('[^']*'|"[^"]*"|[^
\r>]*))*)[
\r]*>
|
}
transHTMLtag {\1} {\2} {
|
}
transHTMLtag {html} {} {
}
transHTMLtag {head} {} {
}
transHTMLtag {title} {} {ein Test}
transHTMLtag {/title} {} {
}
transHTMLtag {/head} {} {
}
transHTMLtag {body} {} {
}
transHTMLtag {h1} {} {ein Test}
transHTMLtag {/h1} {} {
}
transHTMLtag {red} {} {eine ganz wichtige Seite}
transHTMLtag {/red} {} {
}
transHTMLtag {hr} {} {
}
transHTMLtag {address} {} {
}
transHTMLtag {a} { href="mailto:theo@muehle.welt.all"} {\[theo\]}
transHTMLtag {/a} {} {
}
transHTMLtag {/address} {} {
}
transHTMLtag {/body} {} {
}
transHTMLtag {/html} {} { |
transHTMLtag {} {} {
}
transHTMLtag {html} {} {
}
transHTMLtag {head} {} {
}
transHTMLtag {title} {} {ein Test}
transHTMLtag {/title} {} {
}
transHTMLtag {/head} {} {
}
transHTMLtag {body} {} {
}
transHTMLtag {h1} {} {ein Test}
transHTMLtag {/h1} {} {
}
transHTMLtag {red} {} {eine ganz wichtige Seite}
transHTMLtag {/red} {} {
}
transHTMLtag {hr} {} {
}
transHTMLtag {address} {} {
}
transHTMLtag {a} { href="mailto:theo@muehle.welt.all"} {\[theo\]}
transHTMLtag {/a} {} {
}
transHTMLtag {/address} {} {
}
transHTMLtag {/body} {} {
}
transHTMLtag {/html} {} {
} |
<html>
<head>
<title>ein Test</title>
</head>
<body style="background-color: black; color: #ccccff;">
<h1>ein Test</h1>
<div style="color: #ff0000;">eine ganz wichtige Seite</div>
<hr>
<address>
<a href="mailto:theo@muehle.welt.all">[theo]</a>
</address>
</body>
</html> |
Letzte Änderung: 14.02.2012 | © Prof. Dr. Uwe Schmidt |