숫자만 변수에 저장.

g4_dgs31라는 변수에는 4자리 숫자만 입력되어 저장이 되어야 합니다.

길이가 4자리가 아니면 공백으로 저장 하는 것은 아래에 작성했는데.
숫자만 입력할 수 있는 코딩은 어떻게 해야하는걸까요?
숫자가 아니면 모두 공백("")으로 저장하게 끔 하는 방법 좀 가르쳐 주세요.

if {[string length $g4_dgs31] !=4 } {
            set g4_gid31 ""
      }