Tcl编程简介（二）

列表

　　字符串的另一种解释为列表。一个列表是类似于结果的一个字 符串包含了用空白分开的很多域。例如 "Al Sue Anne John" 是 一个有四个元素的例表，在列表中换行父被视为分隔符。例如：

:g} i5j/hAu+i0　　b c {d e {f g h}} 是一个有三个元素的列表 b 、c 和 {d e {f g h}}。

'{J*_ PHqc0　　Tcl的命令 concat, foreach, lappend, lindex, linsert,list, llength, lrange,lreplace, lsearch, 和 lsort 可以使你对列表操作。51Testing软件测试网*O,] W*l%Jc(D

正则表达式

　　Tcl 提供了两个用于正则表达式的命令 regexp 和 regsub。 这里的正则表导师实际上是扩展的正则表达式，与 egrep 相一致。

　　支持 ^ $ . + ? > < () | []51Testing软件测试网 R G!N1Oo Sk,Qo+T

7R#[E8H&b'yeV g0命令结果51Testing软件测试网F[(?b5G{[{

-d^r4E;fk-p-U0　　每一条命令有俩个结果：一个退出值和一个字符串。退出值标志着命令是否正确执行，字符串给出附加信息。有效的返回制定议在`tcl.h"， 如下：

yP;~V;WgN1Yb&a0TCL_OK
c~F9`Cz"Qo+U0

　　命令正确执行，字符串给出了命令的返回值。51Testing软件测试网)@2[fZg{T:YF

&U B~]-GBR.p%}0TCL_ERROR
u-]a%C+s(M7q051Testing软件测试网"JrB];B O o

　　表示有一个错误发生，字符串给出了错误的描述。全局变量 errorInfo 包含了人类可读的错误描述，全局变量errorCode 机器使用的错误信息。51Testing软件测试网uM7j,P
v?B

B~jpN$v0TCL_RETURN51Testing软件测试网3J Z&M*? Qp
51Testing软件测试网,m_HVg#Iu)X

　　表示 return 命令被调用，当前的命令（通常是一个函数）必须立刻返回，字符串包含了返回值。

SG6~*Jj3Z/l0TCL_BREAK51Testing软件测试网$l#g0Z'q)Z^

;C-y8t9bo;_|&yX0　　表示break已经被调用，最近的巡环必须立刻返回并跳出。字符串应该是空的。

|$OS&o1A/['JY0TCL_CONTINUE
XF)`#{'Ue0

　　表示continue已经被调用，最近的巡环必须立刻返回不跳出。字符串应该是空的。51Testing软件测试网BA2["T&j#i g1H

　　Tcl编程者一般需要关心退出值。当Tcl解释器发现错误发生后会立刻停止执行。51Testing软件测试网ZvAC w;a^]

Procedures 函数

　　Tcl 允许你通过proc命令来扩充命令（定义新的命令），定义之后可以向其它的内建命令一样使用。

mx;J [!jIW0　　例如：51Testing软件测试网v}4b8w6HTy

4D_#Kr's1o0proc pf {str} {
2iEfrE0puts $str
6oTG!JS%m!{0}51Testing软件测试网T,E^(vSerd j
pf "hello world"51Testing软件测试网.p5B? o5OV8z1]\K
这里有一个初学者不注意的地方，上述的定义一定要写成那样子。而不能向下面那样写：51Testing软件测试网5CX[ fgIl!Z@G
proc pf {str}
:]Vl8N{#o)jM i A k0{
)D-|H,r ~i9u:l"xC0puts $str51Testing软件测试网9z1`*I;[(q-r\Xt {
}51Testing软件测试网1K&L#Q1}_c

　　因为proc实际上也只不过是一条命令，是一换行符或分号来结束的，用集群参数来传递函数体。proc的定义如下：

8m gV+V3j!Oiw.l0proc name args tclcommand51Testing软件测试网kk ifG }
Variables: scalars and arrays51Testing软件测试网GQD VDJ [X

@"Y's9sG/c#M+eMy6x051Testing软件测试网O]ii F3Y

sF)w!j#{.d0　　变量：标量和向量（即数组）51Testing软件测试网-U(y\u9Ab2n ~

5F$iY/Wl}[0　　向量就是数组，而标量是没有下表的变量。

　　我们用C来类比：51Testing软件测试网1q2_K)@"Ox

_;j[@h#q3g:D+hT0int i； // i 是标量
'nRmh4^)]0int j[10]； // j 是向量51Testing软件测试网2[`vD6sia#p

xq K"c!hANH051Testing软件测试网Q'_L"CWr"V#H;c2Tj

-z$Ud:A|RZLZ0　　变量不需要定义，使用的时候会自动的被创建。Tcl支持两种

$o#e^9Mw(?0　　变量：标量和向量51Testing软件测试网 Si1^z@h

)|4ER*q4LzYDT!t0　　举个例子来说明吧，

U%I `N3C/H/s051Testing软件测试网+X4ij4H ?1[]
C
set i 100
$p*~iK5j0set j(0) 1051Testing软件测试网H0D.EX$V"uS5`&S
set k(1,3) 20

9J']].g(A!uA9|R'N2R
A051Testing软件测试网1X"{|
^_2y/ZSVf

{1g3Z%Q+fW:x0　　i是标量，j是向量。

5ve#c!w
Q,tK Re+L0　　引用的时候：51Testing软件测试网6V5uQSOz4b

$F0sN)t+V8}/x*U0
Yz8~lA,Q0$i
'gwA5x4Rgm"KZ0$j(0)51Testing软件测试网r7x&Rr5nY&m+lu
$k(1,3)51Testing软件测试网)f{2S:X*`+U&{AwR