TCL помощь нужна ... Срочно!

[Sumitha Sudhakaran]

Предположим, у меня есть файл Tcl для запуска, скажем test.tcl .. и я хочу, чтобы задать файл для проверки, скажем test.tcl file1. Ва мне делать, чтобы извлечь "file1" из командной строки и выполнить тест на файл .. Мне нужна команда Tcl, которая помогает извлечь аргументы из командной строки ..

 

[blooz]

Предположим, у меня есть файл Tcl для запуска, скажем test.tcl .. и я хочу, чтобы задать файл для проверки, скажем test.tcl file1. Ва мне делать, чтобы извлечь "file1" из командной строки и выполнить тест на файл .. Мне нужна команда Tcl, которая помогает извлечь аргументы из командной строки ..

Все Tcl скрипты имеют доступ к трем предопределенных переменных. $ ARGC - количество элементов аргументов, передаваемых сценарию. $ ARGV - список аргументов. $ Argv0 - имя скрипта.

 ставит "имя скрипта" ставит [Lindex $ argv0] ставит "второй аргумент" ставит [Lindex $ ARGV 0] ставит "третий аргумент" ставит [Lindex $ ARGV 1]

Eg.

 tclsh argtest.tcl myarg1 myarg2

Выход Имя сценария является argtest.tcl второй аргумент myarg1 третий аргумент myarg2