Tcl access array key from a value declare in another file

Question

I am working on main script that is souring a file eg foo.tcl In foo.tcl , we have some array variable declare eg

   array set foo {
       "john" "doe"
       "alpha" "beta"
   }

In the main script we are trying to access the value using the key of array

source foo.tcl
set key "john"
puts ${::foo($key)} ;# can't read "::foo($key)": no such element in array
puts ${::foo(john)} ;# not giving error

How to access pass the dynamic key to the array?

Dinesh · Accepted Answer · 2016-11-15 03:45:04Z

3

You can use

puts $::foo($key)

Within braces, substitution won't happen.

answered Nov 15, 2016 at 3:45

Dinesh

16.5k25 gold badges87 silver badges125 bronze badges

Sign up to request clarification or add additional context in comments.

Comments

Sharad · Accepted Answer · 2016-11-15 09:36:03Z

1

You may also use:

puts [set ::foo($key)]

answered Nov 15, 2016 at 9:36

Sharad

10.9k4 gold badges25 silver badges38 bronze badges