tcl - 如何在 Tcl 中打印数组的内容

Question

我想在 Tcl 中打印数组的内容(用于调试)。顺序并不重要，我只想打印每个值。

我该怎么做？

Answer 1

最简单的方法是使用 parray :

% array set val [list a 1 b 2 c 3]
% parray val
val(a) = 1
val(b) = 2
val(c) = 3

如果你只想要键和值，那么，使用循环和 array get :

foreach {key value} [array get val] {
    puts "$key => $value"
}