TCL从列表中删除元素

Question

如何删除TCL列表中的元素说:

1. 其中索引= 4
2. 有值="aa"

我已经谷歌搜索,还没有找到任何内置功能.

Answer 1

set mylist {a b c}
puts $mylist
a b c

按索引删除

set mylist [lreplace $mylist 2 2]
puts $mylist 
a b

按值删除

set idx [lsearch $mylist "b"]
set mylist [lreplace $mylist $idx $idx]
puts $mylist
a

Answer 2

删除元素的另一种方法是将其过滤掉.这种Tcl 8.5技术与其他地方提到的lsearch&lreplace方法的不同之处在于它从列表中删除了所有给定元素.

set stripped [lsearch -inline -all -not -exact $inputList $elemToRemove]

它没有做的是搜索嵌套列表.这是Tcl没有过多努力深入理解您的数据结构的结果.(您可以通过-index选项比较子列表的特定元素来告诉它进行搜索.)