TCLスクリプトで変数を配列名（配列）として使用する

動的変数名を使用しないことをお勧めします。単純にするために、「複合」配列キーを作成できます。

# setup
set variable1 PATH_xyz
set variable2 {3.5400 7.3200}

# store the data in an array named "data"
set data($variable1,modifyPt) $variable2

# extracting it
% puts $data($variable1,modifyPt)    ; # => 3.5400 7.3200

# print the array contents
parray data    ; # => data(PATH_xyz,modifyPt) = 3.5400 7.3200

あなたできる動的変数名を持つ辞書を使用しますが、辞書からデータを抽出するのは少し奇妙です。

# store an empty dictionary in the variable "PATH_xyz"
set $variable1 [dict create]

# `dict set` takes a variable *name*
dict set $variable1 modifyPt $variable2

# `dict get` takes a variable *value*
dict get [set $variable1] modifyPt       ; # => 3.5400 7.3200

同様に、配列を同じように厄介な方法で使用できます。

array set $variable1 [list modifyPt $variable2]
parray $variable1                    ; # => PATH_xyz(modifyPt) = 3.5400 7.3200
puts [set ${variable1}(modifyPt)]    ; # => 3.5400 7.3200

それとも本当に怖い

puts [subst -nobackslashes -nocommands $${variable1}(modifyPt)]