tcl 스크립트를 실행하면 빈 ActiveTcl 창이 열림

Question

perm.tcl이라는 스크립트를 작성했습니다. Windows 시스템에서이 스크립트를 실행하려고합니다.

package require Tk 

proc invert list { 
    set length [llength $list] 
    return $length 
} 

invert {1 2 3 4} 

내가

tclsh perm.tcl 

빈 activetcl 창을 사용하여 명령 프롬프트에서이 코드를 실행하려고 할 때마다

없이 텍스트 또는 아무것도 "파마"라는 제목 열립니다. 이 경우 단순히 숫자 4를 출력해야하지만, 작은 회색으로 된 회색 창만 얻습니다. 나는이 절차가 효과가 있다는 것을 알고있다. 왜냐하면 나는 근면하게 tclsh 명령 프롬프트에 그것을 쓸 때 4의 원하는 결과를 얻는다.

Answer 1

Tk 패키지를 가져 오기 때문이다. 그렇게하면 자동으로 창을 만듭니다. 창을 원하지 않으면 Tk을 가져 오지 마십시오.