Tcl Evaluator-in-a-Page
Below is a little evaluator for Tcl commands. Type any valid Tcl command
in and see the result immediately. Check out our quick tour of the
Tcl syntax. For example, to create a new
button, type the following: 
button .b -text hello -background red
pack .b
 When you're done with the button, type: 
destroy .b
 and it's gone. You may also want to use the puts
command to output results from within loops. For example: 
foreach proc [info procs] {
    puts "$proc [info args $proc]"
}