[tcl]

C언어에서는 argv의 첫번째 원소는 프로그램의 이름이 저장, Tcl 에서는 첫번째 인수가 저장

$argv : 명령행 인수 // list 자체

ex) puts $argv = puts { lists... }

$argc : 명령행 인수의 갯수

argv0 : 실행되고 있는 script의 이름

 

set a 1
proc test {} {
	global channelid1 a
	puts $channelid1 "this is example text : nember = $a"
    		}

set channelid1 [open TEST.txt w]
test
close $channelid1

1. a에 대해 변수 선언

2. 프로시져 명령

    test  → 새로 정의할 프로시져의 이름

    {}     → 프로시져에게 전달할 파라미터 List

    { .. } → 프로시져의 몸체 부분, 내장된 명령을 수행

3. global 전역 변수, 외부의 변수를 사용하고자 하는 프로시져의 내부에 포함

4. puts $channelid1

    입출력 명령에서 puts ?-nonewline? ?channelid? string

5. [open TEST.txt w]

    파일 열기.

open what? acess? permissions?

what : 파일 or 파이프라인의 이름

access :

- r   : 파일에서 내용을 읽을 수 있도록 파일을 연다. 이때 파일은 존재하는 파일

- r+ : 읽기와 쓰기를 위해 파일을 연다. 이때 파일은 존재하는 파일

- w  : 파일에 쓰기 위해 연다. 존재하는 파일인 경우 overwrite하고 존재하지 않으면 생성한다. 

- w+ : 읽거나 쓰기 위해 연다. 존재하는 파일인 경우 overwrite하고 존재하지 않으면 생성한다.

- a   : 파일에 쓰기 위해 연다. 존재하는 파일의 뒤에 덧붙여서 쓴다.

- a+ : 읽거나 쓰기 위해 연다. 존재하는 파일의 뒤에 덧붙여서 쓴다.