You said you are new, so FYI:
If you are starting, use a current tcl version like 8.5
The set command returns the resulting value, it is a feature of the interactive shell
to print the result of a command. When running your script non-interactively your set
commands will not print the result.
/Str.