Tcl教程
TCL语法
 
脚本、命令和单词符号…………………………………………………………………………..2
置换(substitution) ……………………………………………………………………………..2
注释……………………………………………………………………………………………………..5
变量
 
简单变量……………………………………………………………………………………………….5
数组……………………………………………………………………………………………………..6
相关命令……………………………………………………………………………………………….6
表达式
 
操作数………………………………………………………………………………………………...7
运算符和优先级…………………………………………………….………………………………7
数学函数………………………………………………………………………………………………8
List
 
list命令……………………………………………………………………………………………….10
concat命令…………………………………………………………………………………………10
lindex命令………………………………………………………………………………………….11
llength命令………………………………………………………………………………….…….11
linsert命令………………………………………………………………………………..……….11
lreplace命令……………………………………………………………………………………….11
lrange 命令…………………………………………………………………………………………11
lappend命令………………………………………………………………….……………………12
lsearch 命令………………………………………………………………………...……………12
lsort命令…………………………………………………………………………….………..……13
split命令……………………………………………………………………………………….……13
join命令…………………………………………………………………………………..………13
控制流
 
if命令……………………………………………………….……………………………….………13
循环命令:while 、for、 foreach……………………………………………….………14
eval命令…………………………………………………………………………………….………15
source命令…………………………………………………………………………………..16
过程(procedure)
 
过程定义和返回值…………………………………………………………………………………16
局部变量和全局变量…………………………………………………………………………..17
缺省参数和可变个数参数………………………………………………………………….……17
引用:upvar…………………………………………………………………………..………..18
字符串操作
 
format命令……………………………………………………………………………………….19
scan命令…………………………………………………………………………….…………….20
regexp命令
regsub命令
string命令
文件访问
 
文件名
基本文件输入输出命令
随机文件访问
当前工作目录
文件操作和获取文件信息
错误和异常
 
错误
从TCL脚本中产生错误
使用catch捕获错误
其他异常
深入TCL
 
查询数组中的元素
info命令
TCL语法 > 脚本、命令和单词符号
一个TCL脚本可以包含一个或多个命令。命令之间必须用换行符或分号隔开,下面的两个脚本都是合法的:
set a 1
set b 2
set a 1;set b 2
TCL的每一个命令包含一个或几个单词,第一个单词代表命令名,另外的单词则是这个命令的参数,单词之间必须用空格或TAB键隔开。
TCL解释器对一个命令的求值过程分为两部分:分析和执行。在分析阶段,TCL 解释器运用规则把命令分成一个个独立的单词,同时进行必要的置换(substitution); 在执行阶段,TCL 解释器会把第一个单词当作命令名,并查看这个命令是否有定义,如果有定义就激活这个命令对应的C/C++过程,并把所有的单词作为参数传递给该命令过程,让命令过程进行处理。
TCL语法 > 置换(substitution)
注:在下面的所有章节的例子中,'%'为TCL的命令提示符,输入命令回车后,TCL会在接着的一行输出命令执行结果。'//'后面是我自己加上的说明,不是例子的一部分。
TCL解释器在分析命令时,把所有的命令参数都当作字符串看待,例如:
%set x 10 //定义变量x,并把x的值赋为10
10
%set 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+100 //y的值是10+100,这里x被置换成它的值10
10+100
这时,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++过程,并把'expr'和变量置换后得到的'10+110'传递给该命令过程进
行处理。
如果在上例中我们去掉[],那么TCL会报错。因为在正常情况下,TCL解释器只把命令行中的第一个单词作为看作命令,其他的单词都作为普通字符串处理,看作是命令的参数。
注意,[]中必须是一个合法的TCL脚本,长度不限。[]中脚本的值为最后一个命令的返回值,例如:
%set y [expr $x+100;set b 300] //y的值为300,因为set b 300的返回值为300
300
有了命令置换,实际上就表示命令之间是可以嵌套的,即一个命令的结果可以作为别的命令的参数。
■反斜杠置换(backslash substitution)
TCL语言中的反斜杠置换类似于C语言中反斜杠的用法,主要用于在单词符号中插入诸如换行符、空格、[、$等被TCL解释器当作特殊符号对待的字符。例如:
set msg multiple\ space //msg的值为multiple space。
如果没有'\'的话,TCL会报错,因为解释器会把这里最后两个单词之间的空格认为是分隔符,于是发现set命令有多于两个参数,从而报错。加入了'\'后,空格不被当作分隔符,'multiple space'被认为是一个单词(word)。又例如:
%set msg money\ \$3333\ \nArray\ a\[2]
//这个命令的执行结果为:money $3333
Array a[2]
这里的$不再被当作变量置换符。
TCL支持以下的反斜杠置换:
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 d's)
\xhh Hex value given by hh
(any number of h's)
\ newline space A single space character.
例如:
%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提供另外两种方法来使得解释器把分隔符和置换符等特殊字符当作普通字符,而不作特殊处理,这就要使用双引号和花括号({})。
字符串按照反斜杠转成数组

版权声明:本站内容均来自互联网,仅供演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198,我们将在24小时内删除。