TCL语言问题，如何从键盘读入字符串

我是TCL语言初学者，想知道怎么从键盘上读取字符串保存到一个变量中去。哪位大哥能详细写一下，应该就一句话吧，这地方TCL和C好像很不同。