■循环命令：while 、for、 foreach
循环命令包括 while、for、foreach等。
■while 命令
语法为: while test body
参数 test 是一个表达式，body 是一个脚本，如果表达式的值非 0，就运行脚本，直到表达式为
0才停止循环，此时while 命令中断并返回一个空字符串。
例如：
假设变量 a 是一个链表，下面的脚本把 a 的值复制到 b：
set b ” “
set i [expr [llength $a] -1]
while { $i>=0}{
lappend b [lindex $a $i]
incr i -1
}
■for 命令
语法为: for init test reinit body
参数 init 是一个初始化脚本，第二个参数 test 是一个表达式，用来决定循环什么时候中断，第
三个参数 reinit 是一个重新初始化的脚本，第四个参数 body 也是脚本， 硌 诽濉Ｏ吕 肷
侠 饔孟嗤 /p>
set b ” “
for {set i [expr [llength $a] -1]} {$i>=0} {incr i -1} {
lappend b [lindex $a $i] }
■foreach 命令
这个命令有两种语法形式
1、 foreach varName list body
第一个参数 varName是一个变量，第二个参数 list 是一个表(有序集合)，第三个参数 body
是循环体。每次取得链表的一个元素，都会执行循环体一次。 下例与上例作用相同：
set b ” “
foreach i $a{ 3/25/2006 10:11:08 PM 32
set b [linsert $b 0 $i]
}
2、 foreach varlist1 list1 arlist2 list2 …Body
这种形式包含了第一种形式。第一个参数 varlist1 是一个循环变量列表，第二个参数是一个列
表 list1，varlist1 中的变量会分别取 list1 中的值。body 参数是循环体。 arlist2 list2 …/p>
表示可以有多个变量列表和列表对出现。例如：
set x {}
foreach {i j} {a b c d e f} {
lappend x $j $i
}
这时总共有三次循环，x 的值为”b a d c f e”。
set x {}
foreach i {a b c} j {d e f g} {
lappend x $i $j
}
这时总共有四次循环，x 的值为”a d b e c f {} g”。
set x {}
foreach i {a b c} {j k} {d e f g} {
lappend x $i $j $k
}
这时总共有三次循环，x 的值为”a d e b f g c {} {}”。
■break 和 continue 命令
在循环体中，可以用break 和continue命令中断循环。其中 break 命令结束整个循环过程，
并从循环中跳出，continue 只是结束本次循环。
■switch 命令
和C 语言中 switch语句一样，TCL 中的 switch 命令也可以由 if命令实现。只是书写起来较为
烦琐。 switch 命令的语法为: switch optionsstring { pattern body pattern
body …
第一个是可选参数 options，表示进行匹配的方式。 TCL 支持三种匹配方式： -exact 方式， -glob
方式，-regexp 方式,缺省情况表示-glob 方式。-exact 方式表示的是精确匹配，-glob 方式的
匹配方式和 string match 命令的匹配方式相同(第八节介绍)，-regexp 方式是正规表达式的 3/25/2006 10:11:08 PM 33
匹配方式(第八节介绍)。第二个参数 string 是要被用来作测试的值，第三个参数是括起来的一
个或多个元素对，例：
switch $x {
a –
b {incr t1}
c {incr t2}
default {incr t3}
}
其中 a的后面跟一个’－’表示使用和下一个模式相同的脚本。default表示匹配任意值。一旦
switch命令 找到一个模式匹配，就执行相应的脚本，并返回脚本的值，作为 switch命令的返
回值。
文章知识点与官方知识档案匹配，可进一步学习相关知识CS入门技能树Linux入门初识Linux24715 人正在系统学习中
声明：本站部分文章及图片源自用户投稿，如本站任何资料有侵权请您尽早请联系jinwei@zod.com.cn进行处理,非常感谢！