Tcl脚本语言教程Word文档格式.docx

1、regsub命令string命令文件访问文件名基本文件输入输出命令随机文件访问当前工作目录文件操作和获取文件信息错误和异常错误从TCL脚本中产生错误使用catch捕获错误其他异常深入TCL查询数组中的元素info命令TCL语法 脚本、命令和单词符号一个TCL脚本可以包含一个或多个命令。命令之间必须用换行符或分号隔开，下面的两个脚本都是合法的： set a 1 set b 2 或 set a 1；TCL的每一个命令包含一个或几个单词，第一个单词代表命令名，另外的单词则是这个命令的参数，单词之间必须用空格或TAB键隔开。TCL解释器对一个命令的求值过程分为两部分：分析和执行。在分析阶段，TCL 解

2、释器运用规则把命令分成一个个独立的单词，同时进行必要的置换（substitution）； 在执行阶段，TCL 解释器会把第一个单词当作命令名，并查看这个命令是否有定义，如果有定义就激活这个命令对应的C/C+过程，并把所有的单词作为参数传递给该命令过程，让命令过程进行处理。 TCL语法 置换（substitution）注：在下面的所有章节的例子中，为TCL的命令提示符，输入命令回车后，TCL会在接着的一行输出命令执行结果。/后面是我自己加上的说明，不是例子的一部分。TCL解释器在分析命令时，把所有的命令参数都当作字符串看待，例如：%set x 10 /定义变量x,并把x的值赋为10 10 %se

3、t y x+100 /y的值是x+100，而不是我们期望的110 x+100 上例的第二个命令中，x被看作字符串x+100的一部分，如果我们想使用x的值10 ，就必须告诉TCL解释器：我们在这里期望的是变量x的值，而非字符x。怎么告诉TCL解释器呢，这就要用到TCL语言中提供的置换功能。TCL提供三种形式的置换：变量置换、命令置换和反斜杠置换。每种置换都会导致一个或多个单词本身被其他的值所代替。置换可以发生在包括命令名在内的每一个单词中，而且置换可以嵌套。变量置换（variable subtitution）变量置换由一个符号标记，变量置换会导致变量的值插入一个单词中。例如：%set y $x+

4、100 /y的值是10+100，这里x被置换成它的值10 10100 这时，y的值还不是我们想要的值110，而是10+100，因为TCL解释器把10+100看成是一个字符串而不是表达式，y要想得到值110，还必须用命令置换，使得TCL会把10+100看成一个表达式并求值。命令置换（command substitution）命令置换是由括起来的TCL命令及其参数，命令置换会导致某一个命令的所有或部分单词被另一个命令的结果所代替。%set y expr $x+100 110 y的值是110，这里当TCL解释器遇到字符时，它就会把随后的expr作为一个命令名，从而激活与expr对应的C/C+过程，并

5、把expr和变量置换后得到的10+110传递给该命令过程进行处理。如果在上例中我们去掉，那么TCL会报错。因为在正常情况下，TCL解释器只把命令行中的第一个单词作为看作命令，其他的单词都作为普通字符串处理，看作是命令的参数。注意，中必须是一个合法的TCL脚本，长度不限。中脚本的值为最后一个命令的返回值，例如：%set y expr $x+100;set b 300 /y的值为300，因为set b 300的返回值为300 300 有了命令置换，实际上就表示命令之间是可以嵌套的，即一个命令的结果可以作为别的命令的参数。反斜杠置换（backslash substitution）TCL语言中的反斜杠

6、置换类似于C语言中反斜杠的用法，主要用于在单词符号中插入诸如换行符、空格、$等被TCL解释器当作特殊符号对待的字符。set msg multiple space /msg的值为multiple space。如果没有的话，TCL会报错，因为解释器会把这里最后两个单词之间的空格认为是分隔符，于是发现set命令有多于两个参数，从而报错。加入了后，空格不被当作分隔符，multiple space被认为是一个单词（word）。又例如：%set msg money $3333 nArray a2 /这个命令的执行结果为：money $3333 Array a2 这里的$不再被当作变量置换符。TCL支持以下

7、的反斜杠置换:Backslash Sequence Replaced By a Audible alert （0x7） b Backspace （0x8） f Form feed （0xc） n Newline （0xa） r Carriage return （0xd） t Tab （0x9） v Vertical tab （0xb） ddd Octal value given by ddd （one, two, or three ds） xhh Hex value given by hh （any number of h newline space A single space charac

8、ter. set a x48 /对应 xhh H /十六进制的48正好是72，对应H set a 110 /对应 ddd H /八进制的110正好是72，对应H set a expr / 对应newline space，一个命令可以用newline转到下一行继续 2+3 5 双引号和花括号 除了使用反斜杠外，TCL提供另外两种方法来使得解释器把分隔符和置换符等特殊字符当作普通字符，而不作特殊处理，这就要使用双引号和花括号（）。TCL解释器对双引号中的各种分隔符将不作处理，但是对换行符 及和两种置换符会照常处理。%set x 100 100 %set y $x ddd100 ddd 而在花括号中

9、，所有特殊字符都将成为普通字符，失去其特殊意义，TCL解释器不会对其作特殊处理。%set y /n$x expr 10+100 /n$x expr 10+100 TCL语言教程 注释TCL中的注释符是，和直到所在行结尾的所有字符都被TCL看作注释，TCL解释器对注释将不作任何处理。不过，要注意的是，必须出现在TCL解释器期望命令的第一个字符出现的地方，才被当作注释。%This is a comment %set a 100 # Not a comment wrong # args: should be set varName ?newValue?%set b 101 ; # this is a

10、 comment 101 第二行中就不被当作注释符，因为它出现在命令的中间，TCL解释器把它和后面的字符当作命令的参数处理，从而导致错误。而第四行的就被作为注释，因为前一个命令已经用一个分号结束，TCL解释器期望下一个命令接着出现。现在在这个位置出现#，随后的字符就被当作注释了。变量 简单变量一个TCL的简单变量包含两个部分：名字和值。名字和值都可以是任意字符串。例如一个名为 “1323 7&*: hdgg的变量在TCL中都是合法的。不过为了更好的使用置换（substitution），变量名最好按CC+语言中标识符的命名规则命名。 TCL解释器在分析一个变量置换时，只把从符号往后直到第一个不是

11、字母、数字或下划线的字符之间的单词符号作为要被置换的变量的名字。例如:% set a 2 2 set a.1 4 4 % set b $a.1 2.1 在最后一个命令行，我们希望把变量a.1的值付给b，但是TCL解释器在分析时只把$符号之后直到第一个不是字母、数字或下划线的字符（这里是.）之间的单词符号（这里是a）当作要被置换的变量的名字，所以TCL解释器把a置换成2,然后把字符串“2.1”付给变量b。这显然与我们的初衷不同。当然，如果变量名中有不是字母、数字或下划线的字符，又要用置换，可以用花括号把变量名括起来。%set b $a.1 TCL中的set命令能生成一个变量、也能读取或改变一个变

12、量的值。 set a kdfj kjdf kdfj kjdf 如果变量a还没有定义，这个命令将生成 变量a，并将其值置为kdfj kjdf，若a已定义，就简单的把a的值置为kdfj kjdf。set a 这个只有一个参数的set命令读取a的当前值kdfj kjdf。 数组数组是一些元素的集合。TCL的数组和普通计算机语言中的数组有很大的区别。在TCL中，不能单独声明一个数组，数组只能和数组元素一起声明。数组中，数组元素的名字包含两部分：数组名和数组中元素的名字，TCL中数组元素的名字（下标可以为任何字符串。set day（monday） 1 set day（tuesday） 2 第一个命令生成

13、一个名为day的数组，同时在数组中生成一个名为monday的数组元素，并把值置为1，第二个命令生成一个名为tuesday的数组元素，并把值置为2。简单变量的置换已经在前一节讨论过，这里讲一下数组元素的置换。除了有括号之外，数组元素的置换和简单变量类似。例：set a monday set b $day（monday） /b的值为1，即day（monday）的值。set c $day（$a） /c的值为1，即day（monday）的值。TCL不能支持复杂的数据类型,这是一个很大的缺憾，也是TCL受指责很多的方面。但是TCL的一个扩展ITCL填补了这个缺憾 相关命令set这个命令在3.1已有详细介

14、绍。unset这个命令从解释器中删除变量，它后面可以有任意多个参数，每个参数是一个变量名,可以是简单变量，也可以是数组或数组元素。% unset a b day（monday） 上面的语句中删除了变量a、b和数组元素day（monday），但是数组day并没有删除，其他元素还存在，要删除整个数组，只需给出数组的名字。%puts $day（monday） cant read day（monday）: no such element in array % puts $day（tuesday） %unset day day（tuesday） no such variable append和incr这

15、两个命令提供了改变变量的值的简单手段。append命令把文本加到一个变量的后面，例如：% set txt hello hello % append txt ! How are youhello! How are you incr命令把一个变量值加上一个整数。incr要求变量原来的值和新加的值都必须是整数。%set b a a % incr b expected integer but got a%set b 2 %incr b 3 表达式 操作数TCL表达式的操作数通常是整数或实数。整数一般是十进制的， 但如果整数的第一个字符是0（zero），那么TCL将把这个整数看作八进制的，如果前两个字符

16、是0x则这个整数被看作是十六进制的。TCL的实数的写法与ANSI C中完全一样。如：7.9e+12 6e4 3. 运算符和优先级下面的表格中列出了TCL中用到的运算符，它们的语法形式和用法跟ANSI C中很相似。这里就不一一介绍。下表中的运算符是按优先级从高到低往下排列的。同一格中的运算符优先级相同。语法形式结果操作数类型-aaa负a非aint,floatinta*ba/ba%b乘除取模a+ba-b加减a左移位右移位=b小于大于小于等于大于等于int,float,stringa= =ba!等于不等于a&位操作与ab位操作异或a|b位操作或&逻辑与a|b逻辑或a?b:c选择运算a: 数学函数TC

17、L支持常用的数学函数，表达式中数学函数的写法类似于CC+语言的写法，数学函数的参数可以是任意表达式，多个参数之间用逗号隔开。%set x 2 % expr 2* sin（$x List命令list这个概念在TCL中是用来表示集合的。TCL中list是由一堆元素组成的有序集合，list可以嵌套定义，list每个元素可以是任意字符串，也可以是list。下面都是TCL中的合法的list： /空list a b c d a b c d /list可以嵌套 list是TCL中比较重要的一种数据结构，对于编写复杂的脚本有很大的帮助，TCL提供了很多基本命令对list进行操作，下面一一介绍：list命令语法

18、： list ? value value.?这个命令生成一个list，list的元素就是所有的value。% list 1 2 3 4 1 2 3 4 concat命令语法:concat list ?list.?这个命令把多个list合成一个list，每个list变成新list的一个元素。 lindex命令lindex list index 返回list的第index个（0-based）元素。% lindex 1 2 3 4 2 3 4 llength命令llength list 返回list的元素个数。例 % llength 1 2 3 4 3 linsert命令linsert list i

19、ndex value ?value.?返回一个新串，新串是把所有的value参数值插入list的第index个（0-based）元素之前得到。例:% linsert 1 2 3 4 1 7 8 9 10 1 7 8 9 10 2 3 4 lreplace命令lreplace list first last ?value value .?返回一个新串，新串是把list的第firs （0-based）t到第last 个（0-based）元素用所有的value参数替换得到的。如果没有value参数，就表示删除第first到第last个元素。% lreplace 1 7 8 9 10 2 3 4 3 3 1 7 8 2 3 4 % lreplace 1 7 8 2 3 4 4 4 4 5 6 1 7 8 2 4 5 6 lrange命令lrange list first last 返回list的第first （0-based）到第last （0-based）元素组成的串,如果las