$interpreter->Eval('pure-tcl-code-to-create-and-manipulate-widgets');