This is a traditional Tcl page that builds up HTML in procedural code and returns it at the end.