目錄

腳本、命令和單詞符

置換

變量置換

命令置換

反斜杠置換

雙引號(hào)和花括號(hào)

注釋

---

腳本、命令和單詞符

一個(gè) TCL 腳本可以包含一個(gè)或多個(gè)命令。命令之間必須用換行符或分號(hào)隔開。

set a 1

set b 2

或者

set a 1；set b 2? ? ? ? ? ? ? ? 都是合法的

TCL 的每一個(gè)命令包含一個(gè)或幾個(gè)單詞，第一個(gè)單詞代表命令名，另外的單詞則是這個(gè)命令的參數(shù)，單詞之間必須用空格或 TAB 鍵隔開。

TCL 解釋器對一個(gè)命令的求值過程分為兩部分：分析和執(zhí)行。在分析階段，TCL 解釋器運(yùn)用規(guī) 則把命令分成一個(gè)個(gè)獨(dú)立的單詞，同時(shí)進(jìn)行必要的置換(substitution)； 在執(zhí)行階段，TCL 解 釋器會(huì)把第一個(gè)單詞當(dāng)作命令名，并查看這個(gè)命令是否有定義，如果有定義就激活這個(gè)命令對應(yīng) 的 C/C++過程，并把所有的單詞作為參數(shù)傳遞給該命令過程，讓命令過程進(jìn)行處理。

置換

TCL 解釋器在分析命令時(shí)，把所有的命令參數(shù)都當(dāng)作字符串看待

set x 10 ????????//定義變量 x,并把 x 的值賦為 10

set y x+100 //y 的值是 x+100，而不是我們期望的 110

x 被看作字符串 x+100 的一部分，如果我們想使用 x 的值'10' ，就必 須告訴 TCL 解釋器：我們在這里期望的是變量 x 的值，而非字符'x'。怎么告訴 TCL 解釋器呢， 這就要用到 TCL 語言中提供的置換功能。

TCL 提供三種形式的置換：變量置換、命令置換和反斜杠置換。每種置換都會(huì)導(dǎo)致一個(gè)或多個(gè)單詞本身被其他的值所代替。置換可以發(fā)生在包括命令名在內(nèi)的每一個(gè)單詞中，而且置換可以嵌套。

變量置換

變量置換由一個(gè)＄符號(hào)標(biāo)記，變量置換會(huì)導(dǎo)致變量的值插入一個(gè)單詞中。

set y $x+100???????? //y 的值是 10+100，這里 x 被置換成它的值 10

這時(shí)，y 的值還不是我們想要的值 110，而是 10+100，因?yàn)?TCL 解釋器把 10+100 看成是 一個(gè)字符串而不是表達(dá)式，y 要想得到值 110，還必須用命令置換，使得 TCL 會(huì)把 10+100 看 成一個(gè)表達(dá)式并求值。

命令置換

命令置換是由[]括起來的 TCL 命令及其參數(shù)，命令置換會(huì)導(dǎo)致某一個(gè)命令的所有或部分單詞被另一個(gè)命令的結(jié)果所代替。

set y [expr $x+100]? ? ? ? //輸出結(jié)果y是110

這里當(dāng) TCL 解釋器遇到字符'['時(shí)，它就會(huì)把隨后的 expr 作為一個(gè)命令名，從而激活與 expr 對應(yīng)的 C/C++過程，并把'expr'和變量置換后得到的'10+110'傳遞給該命令過程進(jìn)行處理。 如果在上例中我們去掉[]，那么 TCL 會(huì)報(bào)錯(cuò)。因?yàn)樵谡Ｇ闆r下，TCL 解釋器只把命令行中的第一個(gè)單詞作為看作命令，其他的單詞都作為普通字符串處理，看作是命令的參數(shù)。

注意，[]中必須是一個(gè)合法的 TCL 腳本，長度不限。[]中腳本的值為最后一個(gè)命令的返回值。

set y [expr $x+100;set b 300] //y 的值為 300，因?yàn)?set b 300 的返回值為 300

有了命令置換，實(shí)際上就表示命令之間是可以嵌套的，即一個(gè)命令的結(jié)果可以作為別的命令的參 數(shù)。

反斜杠置換

TCL 語言中的反斜杠置換類似于 C 語言中反斜杠的用法，主要用于在單詞符號(hào)中插入諸如換行 符、空格、[、$等被 TCL 解釋器當(dāng)作特殊符號(hào)對待的字符。

set msg multiple\ space //msg 的值為 multiple space。

如果沒有'\'的話，TCL 會(huì)報(bào)錯(cuò)，因?yàn)榻忉屍鲿?huì)把這里最后兩個(gè)單詞之間的空格認(rèn)為是分隔符， 于是發(fā)現(xiàn) set 命令有多于兩個(gè)參數(shù)，從而報(bào)錯(cuò)。加入了'\'后，空格不被當(dāng)作分隔符，'multiple space'被認(rèn)為是一個(gè)單詞(word)。

set msg money\ \$3333\ \nArray\ a\[2]????????//這個(gè)命令的執(zhí)行結(jié)果為：

money $3333

Array a[2]

例子：

set a \x48???????? //對應(yīng) \xhh

H???????? //十六進(jìn)制的 48 正好是 72，對應(yīng) H

set a \110???????? //對應(yīng) \ddd

H???????? //八進(jìn)制的 110 正好是 72，對應(yīng) H

set a [expr \ ????????// 對應(yīng)\newline space，一個(gè)命令可以用\newline 轉(zhuǎn)到下一行繼續(xù) ????????

? ? ? ? ? 2+3]

5

雙引號(hào)和花括號(hào)

除了使用反斜杠外，TCL 提供另外兩種方法來使得解釋器把分隔符和置換符等特殊字符當(dāng)作普通字符，而不作特殊處理，這就要使用雙引號(hào)和花括號(hào)({})。

TCL 解釋器對雙引號(hào)（“”）中的各種分隔符將不作處理，但是對換行符/?及＄和[]兩種置換符會(huì)照常處理。

set x 100

100

set y "$x ddd"

100 ddd

而在花括號(hào)中，所有特殊字符都將成為普通字符，失去其特殊意義，TCL 解釋器不會(huì)對其作特 殊處理。

set y {/n$x [expr 10+100]}

/n$x [expr 10+100]

注釋

TCL 中的注釋符是'＃'，'＃'和直到所在行結(jié)尾的所有字符都被 TCL 看作注釋，TCL 解釋器對注 釋將不作任何處理。不過，要注意的是，'＃'必須出現(xiàn)在 TCL 解釋器期望命令的第一個(gè)字符出現(xiàn) 的地方，才被當(dāng)作注釋。 例如：

＃This is a comment

set a 100 # ????????Not a comment

輸出：wrong # args: should be "set varName ?newValue?"

set b 101 ; # this is a comment

輸出：101

第二行中'＃'就不被當(dāng)作注釋符，因?yàn)樗霈F(xiàn)在命令的中間，TCL 解釋器把它和后面的字符當(dāng)作 命令的參數(shù)處理，從而導(dǎo)致錯(cuò)誤。而第四行的'＃'就被作為注釋，因?yàn)榍耙粋€(gè)命令已經(jīng)用一個(gè)分 號(hào)結(jié)束，TCL 解釋器期望下一個(gè)命令接著出現(xiàn)?，F(xiàn)在在這個(gè)位置出現(xiàn)'#'，隨后的字符就被當(dāng)作注釋了。