需要动态的生成html，之前硬拼一堆tag实在太凌乱，于是写了个结构化的html生成类，现在清爽多了。
本身就是tcl代码，所以里面可以直接使用任意的语句，非常方便。
长这样：
HTML <title> "Tcl HTML demo"
HTML -html {
<head> <title>
<body> {
<table> -class mb_table -style width:100% {
<caption> "Moons of planets"
<tbody> {
<!--> a comment tag to mark the last parameter as a script block
foreach {planet moons} {Mercury 0 Venus 0 Earth 1 Mars 2 Jupiter 53 Saturn 53 Uranus 27 Neptune 14} {
<tr> {<td> - nowrap -align center {<b> $planet} ; <td> $moons}
}
}
}
}
}
--
FROM 218.241.217.*