Модераторы: powerfox, ZeeLax
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Кто знаком с Tcl, help me please !!! 
:(
    Опции темы
Matrixon
  Дата 3.1.2006, 02:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 17
Регистрация: 17.2.2005

Репутация: нет
Всего: нет



Всем привет
люди, кто знаком с ТСЛ отзовитесь пожалуйста ......

как написать программу которая ищет по всему компу(во всех папках) файлы с заданным расширением?

я использовал glob -types f *.exe

Но так как я новичек в этом деле то я запутался ....

помогите плиз.



Если есть ответ для bash среды , то тоже буду рад


За ранее благодарен
Сергей
smile
PM MAIL   Вверх
bilbobagginz
Дата 4.1.2006, 16:58 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Naughtius Maximus
****


Профиль
Группа: Экс. модератор
Сообщений: 8813
Регистрация: 2.3.2004
Где: Israel

Репутация: 14
Всего: 317



приведи свойнеработающий код.




--------------------
Я ещё не демон. Я только учусь.
PM WWW   Вверх
Matrixon
Дата 6.1.2006, 03:44 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 17
Регистрация: 17.2.2005

Репутация: нет
Всего: нет



bilbobagginz спасибо что отозвался .....

Я только начал но не знаю как писатьв файл

а код вот такой
set n 0
set array_files [globe -types f *.tcl] //will search all files with tcl extension
while {file exist}{

set file [open $[lindex $array_file $n] r]
close $file
}
чтото на подобии этого

Это сообщение отредактировал(а) Matrixon - 6.1.2006, 03:55
PM MAIL   Вверх
bilbobagginz
Дата 6.1.2006, 18:58 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Naughtius Maximus
****


Профиль
Группа: Экс. модератор
Сообщений: 8813
Регистрация: 2.3.2004
Где: Israel

Репутация: 14
Всего: 317



1. я думаю тебе в самоучитель по tcl.
и по быстрому.
2. globe нельзя. надо glob

пока.



--------------------
Я ещё не демон. Я только учусь.
PM WWW   Вверх
Matrixon
  Дата 8.1.2006, 07:16 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 17
Регистрация: 17.2.2005

Репутация: нет
Всего: нет



блин ну опечатался малость .....

вот еще код , но тоже гдето ошибка

подскажи плиз где я ошибся


Код

#!/usr/bin/tclsh

proc matrix { Fname } {
 set fd [open [$place] a]        <------   почему тут даёт ошибку в $place ?
 puts $fd "\n\n puts i was here \n\n"
 close $fd
}

set num 0
set flist [glob -types f *.tcl]
set msize [llength $flist]
set place [lindex $flist $num]

while { $num <= $msize } {           <------   почему тут даёт ошибку ?
  matrix [lindex $flist $num]
  incr num
}



скрипт должен находить все файлы с *.tcl и добавлять в них
Код

puts $fd "\n\n puts i was here \n\n"



есть ошибка в while.... но я не понимаю почему... 14 строчка

За ранее благодарен

Это сообщение отредактировал(а) Matrixon - 8.1.2006, 08:26
PM MAIL   Вверх
Matrixon
Дата 8.1.2006, 08:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 17
Регистрация: 17.2.2005

Репутация: нет
Всего: нет



короче я сам разобрался с этим..... smile

есть другой вопрос :
smile

как из самой программы запустить другой скрипт *.tcl ? smile

пробовал при помощи exec , не вышло smile
PM MAIL   Вверх
bilbobagginz
Дата 9.1.2006, 18:14 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Naughtius Maximus
****


Профиль
Группа: Экс. модератор
Сообщений: 8813
Регистрация: 2.3.2004
Где: Israel

Репутация: 14
Всего: 317



source $filename



--------------------
Я ещё не демон. Я только учусь.
PM WWW   Вверх
Matrixon
  Дата 9.1.2006, 21:56 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 17
Регистрация: 17.2.2005

Репутация: нет
Всего: нет



круто smile , работает , спасибо smile

только чтобы запустить какой либо файл , нужно его сначала найти , а это (у меня) заняло несколько строчек ...
есть ли возможность запустить файл (файл и директория извесны) с одной строчки ?


Это сообщение отредактировал(а) Matrixon - 10.1.2006, 07:19
PM MAIL   Вверх
Matrixon
Дата 21.1.2006, 21:09 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 17
Регистрация: 17.2.2005

Репутация: нет
Всего: нет



а ты откуда ?

Это сообщение отредактировал(а) Matrixon - 21.1.2006, 21:13
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Linux/UNIX: Клуб юнуксоидов"
powerfox
ZeeLax
nickless

Что такое клуб юнуксоидов?

Это место более свободного общения специалистов и любителей *NIX систем.


Новичкам: Этот раздел предназначен в основном именно для общения а не решения проблем.


Правила всего раздела Linux/UNIX сюда не распространяются, но здесь имеются свои правила:


  • Оскорбления запрещены.
  • Holy wars разрешены, но в небольших размерах. Если вы создаёте что-то уровня Windows vs. Linux, то постите это в Религиозных войнах, пожалуйста.
  • Если вы хотите выставить здесь какое-либо своё творение - милости просим.
  • За интересные новости, интересные статьи, высказывания и юмор (в тему) + в репу.

Короче, по репе получите по полной программе ;-) Happy hacking!



Спасибо. И use UNIX or die; С уважением, nerezus, nickless, powerfox, pythonwin, Imple, ZeeLax.

 
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Клуб юнуксоидов | Следующая тема »


 




[ Время генерации скрипта: 0.0572 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.