LINUX.ORG.RU

Скрипт на Tcl с ключом запуска


0

0

Здрасьте всем.

Я тут бестолково наваял пару скриптов на Tcl. Все работало ой как хорошо, но таки понадобилось запускать Tcl скрипт с ключом, напр. ./myprog.tcl 99.

Дальше смешно - сейчас у меня параметр для скрипта передается вот так:

#!/bin/bash cat <<EOF | 99 EOF ./myprog.tcl

В скрипте, соответственно,

set channel {stdin} while { [ gets $channel sessa ] >= 0 } { .....

:(

Подскажите, как должна выглядеть программа на Tcl, чтобы её можно было запускать как ./myprog.tcl 99.

anonymous

Есть глобальные переменные argc (число аргументов), argv (список аргументов).

man tclvars в общем.

Vadim_Z
()
Ответ на: комментарий от anonymous

Дословно, man tclvars
Оно не как параметры передается, а как глобальные переменные.
С глобальными переменными работать умеем?

Грубо говоря,
if { $argc > 0 } {
set sessa [lindex $argv 0]
}



Vadim_Z
()
Ответ на: комментарий от Vadim_Z

The following variables are only guaranteed to exist in tclsh and wish executables:

argc The number of arguments to tclsh or wish. argv Tcl list of arguments to tclsh or wish.

Я бездарность :) Говорила мне мама не выпендриваться и писать скрипты на shell. Все скрипты стали короче на пару сотен строк. А в чертовых буржуйских книжках написано так, словно это абстрактные названия параметров.

Спасибо, уважаемый.

anonymous
()

Хаа.. Госсподи, я твой код наверное на wtf программисткий скину :) Чесна первый раз вижу чтоб в тикле чел сначала разобрался с каналами и пайпами а потом с argc :))))))))

Так держать! Гыы

anonymous
()
Вы не можете добавлять комментарии в эту тему. Тема перемещена в архив.