使用數組獲取後，如何刪除TCL中的索引

Question

我有一個數組完成的過程。爲了返回它，我使用「數組獲取」來檢索列表。此列表然而，這並不只包含我的數組entrys，而且他們的指標：

所以我的陣列[ a b c d ]變成一個列表{ 0 a 1 b 2 c 3 d }

我怎樣才能擺脫這些索引編號，而不會干擾列表的順序？

Answer 1

我覺得這是使用foreach循環的最簡單和最基本的方法：

% set list {0 a 1 b 2 c 3 d} 
% set entrylist {} 
% foreach {id entry} $list { 
%  lappend entrylist $entry 
% } 
% puts $entrylist 
a b c d 

Answer 2

有幾個選項，除了使用foreach：

# [array get] actually returns a dictionary 
puts [dict values $list] 

# Could do this too 
set entrylist {} 
dict for {- entry} $list { 
    lappend entrylist $entry 
} 
puts $entrylist 

有Tcl 8.6更多的可能性：

puts [lmap {- entry} $list {set entry}] 

（還有一個dict map，但在這裏是沒有用的。）

我喜歡dict values ...

Answer 3

如果你已經有一個數組和工作，Tcl的8.5或更高版本，使用dict values：

set arr(0) a 
set arr(1) b 
set arr(2) c 
set arr(3) d 

puts [dict values [array get arr]] 

但最好是使用一個簡單的list：

set mylist {a b c d} 
lset list 1 boo 
puts [lindex $mylist 1] 
lappend mylist eff 

數組是關聯的。總是。