You are here

tcl에서도 perl의 해시 같은 기능이 있나요?

(aa란 텍스트 파일 시작)
#name
1 LG
2 Samsung
3 SK
4 Lotte
#endname

#hash
$1/love
c01 01

$2/hate
c11 10

(aa란 텍스트 파일 끝)

안녕하세요. tcl초보입니다. 두가지 궁금한점이 있어 여쭤봅니다.

1. 위의 aa란 텍스트 파일의 #name에서 #endname 사이에 위치한 line들을 perl의 해시와 같이 저장하는 게 목표입니다. (연관배열이라는게 있다는데 ... 자세히 나온곳이 없더라구요 ㅠㅠ)
즉, 1=키 LG=value 로 해시와 같이 저장한 뒤, 1을 불러 들이면 LG가 출력되게끔 하고 싶습니다. (2를 불러들이면 Samsung을 출력하고 싶구요)

2. 1번의 결과를 토대로 string first를 이용해 아랫줄의 $1와 매칭하고 싶습니다.
즉, $1과 #name의 숫자1이 매칭되므로, $1대신 => LG 를 출력하고 싶습니다.

위와 같이 코드를 작성할 수 있을까요?