array 在tcl中用法

在Tcl中，array（数组）是一种数据结构，用于存储一组键值对。以下是使用数组的基本用法：

1. 创建一个数组：

array set myArray {
    key1 value1
    key2 value2
    key3 value3
}

2. 访问数组元素：

puts $myArray(key1) ;# 输出：value1

3. 更新数组元素：

set myArray(key2) newValue

4. 遍历数组元素：

foreach {key value} [array get myArray] {
    puts "$key: $value"
}

5. 判断数组中是否存在某个键：

if {[info exists myArray(key3)]} {
    puts "key3存在"
} else {
    puts "key3不存在"
}

6. 删除数组元素：

array unset myArray key3

这些是数组在Tcl中的基本用法，还有更多高级的操作和函数可供使用。你可以根据具体需求来使用和探索Tcl中的数组功能。