one-file-live.tcl