puts stdout "output from example.tcl wrapped in polyglot script"