Tcl列表遍历

假设有如下列表：

set vList {a b c d e}

有五种遍历列表的方式：

1.foreach遍历列表元素。

foreach v $vList { puts $v }

 2.foreach与lrange结合遍历部分列表元素。

foreach v [lrange $vList 1 3] { puts $v }

3.for与llength、lindex结合通过下标遍历列表。

for { set x 0 } { $x < [llength $vList] } {incr x} {
    puts "$x--[lindex $vList $x]"
}

4.while与llength、lindex结合通过下标遍历列表。

set x 0
while {$x<[llength $vList]} {
    puts "$x--[lindex $vList $x]"
    incr x
}

5.lmap，Tcl8.6新增的命令。此命令会返回一个新的列表。

lmap v $vList {puts $v}