如何在 Tcl 中创建哈希的哈希

0 arrays hash associative-array tcl

希望一切都好。

我是 TCL 编程语言的新手,开始从事一个项目。

我想根据下表在这里创建一个哈希 -

在此输入图像描述

我想创建一个名为MEM_GROUP 的散列,并想要访问值DDR1DDR2等。假设我想打印属于Person3所有权DDR3那么如何访问它? 请帮我。

Sha*_*awn 5

首先使用 tcldict不是数组 - 它们都是底层的哈希表,但 dict 接口明确支持易于使用的带有键链的嵌套表:

#!/usr/bin/env tclsh                                                                                                                                                                                                                             

set mem_group [dict create]
dict set mem_group Person1 ownership DDR1
dict set mem_group Person2 ownership DDR2
dict set mem_group Person3 ownership DDR3
dict set mem_group Person4 ownership DDR4

puts [dict get $mem_group Person3 ownership]
Run Code Online (Sandbox Code Playgroud)