Tcl 변수 이름을 변수 이름으로 지정

Question

Tcl에 문제가 있습니다. 문자열이 들어있는 변수가 있습니다. Butt 이제이 문자열을 다음 변수의 이름으로 사용하겠습니다.

나는 웹에서 비슷한 질문을 발견했다. 그러나 이것들은 변수의 값을 다른 변수에 두는 것에 관한 것이다. 변수의 이름으로 사용하지 마십시오. 는 다음을 수행 할 수있다 그래서 bassicly

foreach key [array names ::openedFiles] { 
    puts $::openedFiles($key) 
    set filename [file tail $::openedFiles($key)] 
    set parts [split $filename .] 
    set name [lindex $parts 0] 

    puts $name 

    $L1 create cell $name 

    set "value of $name" [ layout create $::openedFiles($key) -dt_expand -log LUN.log] 

: 여기

은 설명 도움이되는 샘플 코드입니다. 배열에 경로 문자열이 있습니다. 파일 확장자가없는 경로에서 파일 이름 만 가져옵니다.

버트 다음 "$ name"의 값인 "셀"변수를 만들고 싶습니다. 파일 이름이 "테스트"입니다 때, $ 이름의 값은 "테스트"가 될 것이며, 나는 그래서 $ 이름의 값이 새의 이름이 될 것이라고이

 set Test [ layout create $::openedFiles($key) -dt_expand -log LUN.log] 

같은 마지막 행을 수행 할 변하기 쉬운. 그래서 배열의 모든 값의 이름으로 변수를 만들 수 있습니다.

도움이나 조언이 도움이 될 것입니다.

대단히 감사합니다!

Answer 1

올바른 해결책은

set name "foo" 
set $name "bar" 
puts $foo ;# -> bar 

를 설정하는 첫 번째 매개 변수로 $name을 사용하는 것입니다하지만 $name를 사용하려고하면 그것은 당신이 코멘트에 따라 코드에서 할 것입니다 foo하지 bar을 (얻을 것입니다 . 당신이 어쨌든 이름이 당신이 모르는 변수 만해야하는 이유를 알고 싶습니다 :.

puts [set $name] ;# -> bar 

는 당신에게 올바른 일을 줄 것을 객체와 같은 작품 :

set topcell [[set $name] topcell] 

그럼 물어볼 필요가 있습니다. 동적 이름이 지정된 변수로 무엇을하고 싶습니까?

Answer 2

내가

$ tclsh 
% set name Test 
Test 
% upvar 0 cell $name 
% set cell 42 
42 
% puts $Test 
42