Просмотр отдельных изменений

'{{другие значения|TCL}} {{Карточка языка программирования | name = Tcl | logo = [[Файл:Tcl.svg|70px]]| semantics = [[Императивное программирование|императивный]], [[скриптовый язык|скриптовый]] | class = [[интерпретатор]] | year = 1988 | designer = [[Оустерхаут, Джон|Джон Оустерхаут]] | latest_release_version = 8.6.1 | latest_release_date = 20 сентября [[2013 год]]а | typing = динамическая | influenced_by = [[Командная оболочка UNIX|Shell]], [[Lisp]] | influenced = [[Python]] | license = [http://www.tcl.tk/software/tcltk/license.html BSD-подобная] | website = http://www.tcl.tk/ }} '''Tcl''' (от {{lang-en|Tool Command Language}} — «командный язык инструментов», читается «тикль» или «ти-си-эль») — [[скриптовый язык]] высокого уровня. Tcl часто применяется совместно с [[графический интерфейс пользователя|графической]] [[библиотека (программирование)|библиотекой]] [[Tk]] (Tool Kit). Связку Tcl/Tk по-русски иногда называют «Так-тикль» (английский вариант — «тикль-ток»). Области применения языка — [[Прототипирование программного обеспечения#Быстрое прототипирование|быстрое прототипирование]], создание графических интерфейсов для [[консольная программа|консольных программ]] (пакетов программ), [[Скриптовый язык#Встраиваемые|встраивание]] в прикладные программы, [[Тестирование программного обеспечения|тестирование]]. Также Tcl применяется в [[веб-разработка|веб-разработке]]. == Особенности == В Tcl данными всех типов, включая код программы, можно манипулировать как строками. Это делает его языком с естественной поддержкой [[метапрограммирование|метапрограммирования]]. Эта [[парадигма программирования]] учитывалась в ходе разработки и эволюции языка. Программа на Tcl состоит из [[команда (программирование)|команд]], разделённых символами новой строки или точками с запятой. Каждая команда состоит из набора полей, разделённых пробелами. Первое поле должно быть именем команды, а необязательные остальные поля — передаваемые этой команде аргументы. Команда возвращает значение, иногда пустое. То есть, как и в [[Lisp|Лиспе]], в Tcl используется префиксная нотация. [[ключевое слово|Ключевых слов]] как таковых нет — понятие команды в Tcl аналогично понятию [[Процедура (программирование)|процедуры]] или [[Функция (программирование)|функции]] распространённых языков программирования. Это относится и к управляющим конструкциям языка. В сочетании с элементарным синтаксисом это обеспечивает хорошую расширяемость языка, в том числе и библиотеками, написанными на других языках, таких как [[Си (язык программирования)|C]]/[[C++]] или [[Java]]. В Tcl также качественно реализована [[Событийно-ориентированное программирование|модель управления программой на основе событий]]. События могут генерироваться таймером, при появлении данных в канале, изменении значения переменной, при завершении какой-либо внешней программы, или просто при работе пользователя с интерфейсом Tk. Можно задавать свои события и управлять ими. Как и большинство современных [[Скриптовые языки|скриптовых языков]] Tcl содержит развитые средства работы с регулярными выражениями, работает с [[Ассоциативный массив|ассоциативными массивами]] и другими динамическими структурами данных. В базовом Tcl нет поддержки [[Объектно-ориентированное программирование|ООП]], однако существует множество расширений Tcl объектно-ориентированными механизмами, реализованных в виде подключаемых библиотек на [[Си (язык программирования)|Си]], или самом Tcl. Вот самые распространённые из них<ref>если ни одна из реализаций объектной модели вас не устраивает, либо вы интересуетесь, как это работает, можете ознакомиться со статьёй [http://www.wjduquette.com/tcl/objects.html Creating Object Commands]{{ref-en}} от создателей [[SNIT]]</ref>: {|class="standard" ! расширение||реализовано на||особенности используемой модели |- |[[XOTcl]] |C |мощная объектная система с динамическим определением классов и методов, близкая к [[CLOS]] |- |[[incr Tcl]] |C |[[Объектно-ориентированное программирование|ООП]] в стиле, близком к [[C++]], расширенном введением ''конфигураторов'' |- |[[Snit]] |Tcl |реализация объектной модели на основе [[Делегирование (программирование)|делегирования]], а не [[Наследование (программирование)|наследования]] |- |[[STOOOP]] |Tcl |ООП в стиле, максимально близком к C++, также введён механизм ''переключения классов'' |- |[[TclOO]]<ref>[http://wiki.tcl.tk/18152 TclOO] в TclWiki</ref> |C |Компактная, но мощная объектно-ориентированная система, которую можно использовать как непосредственно, так и как фреймвок для построения расширенных моделей ООП. |} Пространства имён поддерживаются на уровне ядра языка. При реализации механизмов ООП на Tcl используется поддержка иерархии вложенности [[Пространство имён (программирование)|пространств имён]] в этом языке<ref>{{книга|автор=Clyf Flynt|часть=8.1.7. Namespace nesting|заглавие=Tcl/Tk: A Developer's Guide|издание=3-rd edition|издательство=Waltham, MA : Morgan Kaufmann|год=2012|pages=215|allpages=792|isbn=0-12-384717-6}}</ref>. На Tcl легко программировать в [[Функциональное программирование|функциональном стиле]]: он обеспечивает такие механизмы, как функции высшего порядка и абстракции функций<ref>см. также [http://wiki.tcl.tk/967 Steps towards functional programming]</ref>, хотя Tcl редко используют таким образом. Вот пример того, как можно осуществить [[Композиция функций|композицию двух функций]]: <source lang=tcl>proc o {f g x} {$f [$g $x]}</source> В версии 8.5 в Tcl также введена команда ''apply'', значительно облегчающая программирование в этом стиле. Вот пример её использования из официальной документации: <source lang=tcl>proc map {lambda list} { set result {} foreach item $list { lappend result [apply $lambda $item] } return $result } map {x {return [string length $x]:$x}} {a bb ccc dddd} </source> результатом работы этого примера будет <pre>1:a 2:bb 3:ccc 4:dddd</pre> == История == Язык разработан [[Оустерхаут, Джон|Джоном Оустерхаутом]] (John Ousterhout) в то время, когда он работал в университете Калифорнии в Беркли. Первоначальной целью было создание универсального языка для встраивания в [[консольная программа|консольные приложения]]. Вслед за этим Оустерхаут расширил свой язык средствами создания [[Графический интерфейс пользователя|графических интерфейсов]] — так появился Tcl/Tk.<ref>См.[http://www.tcl.tk/about/history.html History of Tcl]</ref> За 4 года развития в университетских стенах Тикль-сообщество выросло до нескольких сотен тысяч программистов. В 1993 году было разработано первое объектно-ориентированное расширение — [[incr Tcl]]. В 1994 г. Оустерхаут становится ведущим инженером проекта SunScript. В течение следующих 4 лет, став одним из проектов корпорации [[Sun Microsystems|Sun]], Тикль не только остался [[Свободное программное обеспечение|свободно распространяемой]] системой, но и значительно усовершенствовался, стал [[Кроссплатформенное программное обеспечение|кросс-платформенным]]. Заметный удар по популярности языка нанёс [[Столлман, Ричард Мэттью|Ричард Столлман]], опубликовав в сентябре 1994 г. в ряде новостных групп рекомендацию «Почему вы не должны использовать Tcl»<ref>[http://www.vanderburg.org/OldPages/Tcl/war/ Why you should not use Tcl]</ref>. В ней он на основании утверждений, что ''«Tcl разработан не как серьёзный язык программирования»'' и ''«Tcl имеет особый синтаксис, притягательный для [[хакер]]ов из-за своей простоты. Но синтаксис Tcl кажется странным для большинства пользователей.»'', а также в связи с продвижением [[Emacs Lisp]] вынес вердикт: ''«проект [[GNU]] не собирается использовать Tcl в программном обеспечении GNU»''. Помимо субъективных претензий к дизайну языка, Столлман указал на объективный на тот момент недостаток — низкое быстродействие. Тем не менее, рост количества разработчиков, активно использующих тикль, составил за этот период 600 %. В 1998 г. в связи с [[Java]]-бумом и связанной с ним острой конкурентной борьбой корпорация уже не могла уделять тиклю прежнего внимания. Джон Остераут покидает Sun и создаёт (при поддержке Sun) компанию Scriptics, продолжая развитие технологии Tcl/Tk<ref>{{статья|автор=Камерон Лэрд, Кэтрин Сорэз, SunWorld, США|заглавие=Создатель Tcl уходит из Sun в новое предприятие|ссылка=http://www.osp.ru/cw/1998/07/27311/|издание=Computerworld |издательство=[[Открытые системы (издательство)|Открытые системы]]|год=1998|номер=07}}</ref><ref>{{статья|автор=Роберт Макмиллан, SunWorld|заглавие=Tcl: путь к новой жизни|ссылка=http://www.osp.ru/cw/1998/36/31691/|издание=Computerworld |издательство=[[Открытые системы (издательство)|Открытые системы]]|год=1998|номер=36}}</ref>. Это была одна из первых коммерческих программных фирм, чья деятельность строилась вокруг бесплатного [[Свободное программное обеспечение|свободного ПО]]. [[Файл:Tcl logo.gif|frame|Цветовое решение логотипа, принятое в 90-х гг. XX века]] В марте 1998 года Оустерхаут пишет ставшую классической статью «Сценарии: высокоуровневое программирование для XXI века»<ref>[http://home.pacbell.net/ouster/scripting.html John K. Ousterhout Scripting: Higher Level Programming for the 21st Century]{{ref-en}}.<br /> [http://www.osp.ru/os/1998/03/179470/ Перевод этой статьи]{{ref-ru}} в журнале «Открытые системы», № 3, 1998</ref>, в которой назвал скриптовые языки языками системной интеграции, потому что они ориентированы прежде всего на работу с объектами операционной среды, а не с элементарными данными. Это позволяет без написания тысяч [[количество строк кода|строк кода]] двумя-тремя командами «склеивать» такие объекты в одно целое. В том же году он выиграл за разработку языка Tcl две крупных награды. Первая — это [[ACM]] Software System Award, вручаемая за «наиболее значимое программное обеспечение». Этой наградой до этого были отмечены такие основополагающие системы, как стек протоколов [[TCP/IP]], первая [[электронная таблица]], первая [[реляционная база данных]], [[World Wide Web]], [[Unix]], [[PostScript]] и [[Smalltalk]]. Вторая — это ежегодная USENIX Software Tools User Group (STUG) Award, в знак признания выдающегося программного обеспечения. В 1999 году выходит Tcl 8.0 — в этой реализация впервые появилась компиляция в [[байткод]], что позволило в 6 раз поднять быстродействие<ref name="bench">см. [http://wiki.tcl.tk/1611 Tcl Benchmarks]</ref>. В следующую модификация Tcl 8.1 введена полноценная поддержка [[юникод]]а, в ней впервые реализована [[многопоточность]]. В связи c этим релизом Остераут заявил: {{цитата|«В целом 8.1 переводит Tcl в новую категорию, поскольку теперь его можно использовать для серверных приложений. Си, Си++ и Java можно по-прежнему использовать для создания частей приложений, критических с точки зрения производительности, а Tcl — для интеграции и создания интерфейсных компонентов».''<ref>{{статья|автор=Тед Смалли Боуэн|заглавие=Tcl: корпоративный вариант|ссылка=http://www.osp.ru/cw/1999/21/35698/|издание=Computerworld |издательство=[[Открытые системы (издательство)|Открытые системы]]|год=1999|номер=21}}</ref>}} В 2000 году фирма Scriptics была переименована в Ajuba Solutions, а затем куплена фирмой Interwoven, не заинтересованной в работе со [[Свободное программное обеспечение|свободным ПО]]. В связи с этим разработка Tcl была передана сообществу программистов. Так была сформирована [http://www.tcl.tk/community/coreteam/ Tcl Core Team]. На 9-ой конференции по Tcl/Tk, проходившей в [[Ванкувер]]е, была представлена виртуальная файловая система [[MetaKit#StarKit|StarKit]], обеспечившая новый, удобный для обычного пользователя способ распространения Tcl программ. == Синтаксис Tcl == ; Скрипт : команды, разделённые переводом строки или точкой с запятой (;). ; Команда : слова, разделённые пробелами. <source lang=tcl> commandName argument1 argument2 … argumentN</source> Первое слово — имя команды, остальные — её аргументы. Любой аргумент может быть заменён другой командой, помещённой в квадратные скобки. Любые аргументы в фигурных скобках передаются команде «как есть», в виде единого аргумента. === Символы, имеющие особое значение === * <tt>$ </tt> — вызывает подстановку значения переменной. * <tt>[]</tt> — вызывает подстановку результата выполнения команды внутри скобок. * <tt><nowiki>""</nowiki></tt> — группирует аргументы в один с подстановкой значений переменных. * <tt>{}</tt> — группирует аргументы в один без подстановки значений переменных. * <tt>\ </tt> — экранирует следующий символ или вызывает подстановку управляющего символа. * <tt># </tt> — начало однострочного комментария, должен быть после неэкранированного символа перевода строки или «;» (точки с запятой). === Замечания о процессе разборки скрипта === * Разбивка на слова, подстановка значений переменных и результатов выполнения команд производятся за один проход по команде. * Все символы, находящееся внутри скобок <tt>{}</tt> и кавычек <tt>""</tt>, рассматривается как одно слово. * Первое слово команды рассматривается как встроенная или определённая процедура. === Примеры команд === * '''Присваивание''' обозначается словом ''set'', а не знаком равенства. Синтаксис: <source lang=tcl>set переменная значение</source> Пример: <source lang=tcl>set a 2</source> <source lang=tcl>set b 3</source> * '''Комментарий''' обозначается символом ''#'' Синтаксис: <source lang=tcl># текст комментария</source> Пример: <source lang=tcl># это комментарий</source> * '''Вывод (печать)''' реализуется командой ''puts'' Синтаксис: <source lang=tcl>puts выражение</source> Пример: <source lang=tcl> puts "Привет! Это я." puts 123 puts $a puts "b = $b" </source> * '''Цикл''' ''пока'' реализуется командой ''while'', имеющей два аргумента. Первый — Tcl выражение (выражения фактически пишутся на миниатюрном языке, состоящем из математических операций и операций сравнения в стиле языка [[Си (язык программирования)|C]]). Второй аргумент — это скрипт, выполняемый при каждой [[Итерация|итерации]]. Его, как правило, помещают в фигурные скобки, чтобы избежать немедленного выполнения. Синтаксис: <source lang=tcl> while { Выражение_Tcl_С_Логическим_Значением } { TclКоманда другаяTclКоманда … … } </source> <!-- старый вариант while { [TclКомандаСЛогическимЗначением] } { TclКоманда другаяTclКоманда … … } --> Пример: <source lang=tcl> while { $x < 10 } { puts $x incr x } </source> * '''Условная''' команда Синтаксис: <source lang=tcl> if { Выражение_Tcl_С_Логическим_Значением } { КомандаTcl } </source> Пример: <source lang=tcl> if {$x < 0} { set x 0 } </source> * Команда ветвления Пример: <source lang=tcl> switch -glob — $var { {see} - {saw} - {seen} { puts "Все это значит одно и то же!"} } </source> * Команда может не иметь аргументов, например <source lang=tcl>pwd</source> просто возвращает текущий рабочий каталог. А командой <source lang=tcl>set wdir [pwd]</source> вы сохраните имя текущего каталога в переменной ''wdir''. * Команда может возвращать список, например <source lang=tcl>glob Образец</source> возвратит список имён файлов текущей директории, удовлетворяющих шаблону ''Образец''. === Процедуры === Процедуры определяются следующим образом <source lang=tcl> proc имяПроцедуры { списокАргументов } { … … } </source> === Ассоциативные массивы === Следующий фрагмент кода создаст и инициализирует [[ассоциативный массив]] (называемый в других языках также карта, словарь, или хеш). <source lang=tcl> set capital(France) Paris set capital(Italy) Rome set capital(Germany) Berlin set capital(Poland) Warsaw set capital(Russia) Moscow set capital(Spain) Madrid </source> Для запроса и вывода одного из значений ассоциативного массива используется <source lang=tcl>puts $capital(Italy)</source> Список всех стран (ключей массива) можно получить командой <source lang=tcl>array names capital</source> Результат не будет отсортирован, потому что массивы Tcl базируются на [[хеш-таблица]]х. <source lang=tcl>Poland Spain Russia Germany Italy France</source> Сортировку можно выполнить командой <source lang=tcl>lsort [array names capital]</source> Чтобы сослаться на массив (передать его как ссылку) используется имя содержащей его переменной: <source lang=tcl> proc demo arrName { upvar 1 $arrName arr ;# tie the reference to a local name #do something with arr } </source> Для доступа к массиву по значению, используется ''array get'' или ''array set''. Например, чтобы скопировать один массив в другой: <source lang=tcl>array set Newarr [array get Oldarr]</source> В Tcl 8.5 введены массивы, передаваемые по значению — словари (''dict''). Для преобразования скалярной переменной в массив и наоборот следует удалить существующую переменную при помощи команды ''unset''. === Область видимости переменных === По умолчанию внутри процедуры видны только ''определённые в ней'' переменные. За пределами определения процедуры её переменные недоступны, иначе чем через механизм передачи параметров. Вы можете иметь переменные в процедуре с таким же именем, как и в основной программе, при этом значения этих переменных будут различаться, по сути это будут разные переменные. Чтобы изменить это поведение используются команды ''global'' или ''upvar''. == Примеры == === Здравствуй, мир! === Программа [[Hello, world]] выглядит так <source lang=tcl>puts "Здравствуй, мир!"</source> или так <source lang=tcl>puts {Здравствуй, мир!}</source> === Массивы === ==== Обращение к элементам массива ==== Вывод значения элемента массива OldArray(precision), имя которого (массива) задается новой переменной NewArray <source lang=tcl> set NewArray OldArray puts [set ${NewArray}(precision)] </source> ==== Сложение чисел массива ==== Метод (A) — Сложение с использованием цикла 'foreach' <source lang=tcl> set numbers {1 2 3 4 5 6 7 8 9 10} set result 0 foreach number $numbers { set result [expr {$result + $number}] } puts $result </source> Метод (B) — Гораздо более элегантный способ с использованием команды 'join' <source lang=tcl> set numbers {1 2 3 4 5 6 7 8 9 10} puts [expr [join $numbers +]] </source> ==== Список содержимого массива ==== В массиве ''tcl_platform'', содержится информация о свойствах платформы, на которой запущен Tcl. Список имён свойств может быть получен с помощью <source lang=tcl>array names tcl_platform </source> Следующий фрагмент выводит их вместе со значениями: <source lang=tcl> foreach i [array names tcl_platform] { puts "$i = $tcl_platform($i)" } </source> Если свойства должны быть отсортированы <source lang=tcl> foreach i [lsort [array names tcl_platform] ] { puts "$i = $tcl_platform($i)" } </source> Здесь демонстрируется вложенность команд. Они могут быть вложены на любую глубину. Подобного же результата можно достичь с помощью команды ''parray'' (появившейся в Tcl 8.5). === Пересечение множеств === Процедура ''filter'' возвращает те элементы списка, для которых ''script'' принимает значение TRUE: <source lang=tcl> proc filter {list script} { set res {} foreach e $list {if {[uplevel 1 $script $e]} {lappend res $e}} return $res } </source> Команда ''uplevel 1'' позволяет вычислить выражение в контексте, в котором вызывается слово ''filter''. Процедура ''in'' — это сокращённая запись для включения (инклюзии) множеств: <source lang=tcl> proc in {list e} { expr {[lsearch -exact $list $e]>=0} } </source> Проверка: <source lang=tcl> % filter {a b c} {in {b c d}} b c </source> === Факториал === <source lang=tcl>proc ! x {expr {$x<2? 1: $x*[! [incr x -1]]}}</source> Здесь демонстрируется, что именем команды могут быть любые строки, а также известный по другим языкам оператор ''?:''. == Реализация, дистрибутивы, инструменты == Tcl — [[интерпретатор|интерпретируемый]] язык, то есть [[компьютерная программа|программы]] на Tcl готовы к выполнению без [[компилятор|компиляции]] и [[Компоновщик|компоновки]]. Интерпретатор Tcl [[Портирование программного обеспечения|портирован]] на большинство распространённых [[Компьютерная платформа|платформ]]. Он распространяется под [[свободный софт|свободной]] [[копилефт|некопилефтной]] [http://www.tcl.tk/software/tcltk/license.html лицензией], позволяющей использовать его без ограничения в разработке [[проприетарное ПО|проприетарных приложений]], а также создавать проприетарные производные системы. Разработчики относят её [[Лицензия BSD|к BSD подобным]], хотя по сравнению с лицензией BSD лицензия Tcl накладывает меньшее количество запретов. === Реализация === В настоящее время работа над ядром языка Tcl ведётся группой разработчиков<ref>[http://wiki.tcl.tk/977 Tcl Core Team — список участников]</ref> именуемой Tcl Core Team<ref>[http://tcl.tk/community/coreteam/ Tcl Core Team]</ref>. Самые свежие версии Tcl-транслятора и основных библиотек доступны в [[Репозиторий|репозитории]] на [[SourceForge.net]], см. список sourceforge-проектов, включаемых в основную поставку Tcl/Tk<ref>[http://tcl.tk/community/sourceforge.html Tcl at SourceForge]</ref>. Транслятор Tcl компилирует программу в промежуточное представление — [[байткод]], а затем интерпретирует её. В отличие от, например, [[Python]], это промежуточное представление не сохраняется на диск, программа может хранится только в исходных текстах, возможно упакованных в [[MetaKit#StarKit|StarKit]] модуль или с помощью какого-нибудь другого [[враппер]]а. В зависимости от параметров компиляции интерпретатор Tcl может поддерживать или не поддерживать [[многопоточность]]. Хотя в большинстве учебников по Tcl для начинающих говорится что-то вроде «в Tcl есть всего один тип переменных — строка», на самом деле трансляторы Tcl уже давно как устроены по-другому. Внутри Tcl использует систему динамических типов с автоматическим, прозрачным преобразованием к строковому виду. Tcl входит практически во все дистрибутивы [[Linux]]. Для [[Microsoft Windows]] требуется отдельный установочный пакет. В настоящее время текущая стабильная версия Tcl 8.4, её основные отличия от предыдущей — новые функции (оптимизация 64-битного кода, VFS, дополнения в плане [[Интроспекция (программирование)|интроспекции]]) и некоторое повышение быстродействия за счёт оптимизации работы с байткодом. Новые возможности, добавленные в версии 8.1 (в частности, поддержка многопотокового выполнения, средства интернационализации и работа с символами Unicode), замедлили работу Tcl по сравнению с давшей скачок скорости восьмой версией примерно на 19 %. Разработчики 8.4 приложили все усилия для того, чтобы максимально повысить скорость выполнения программ, добиться, чтобы они работали не только не медленнее, но даже быстрее, чем это было при появлении версии 8.0. Эта цель была достигнута практически для всех средств Tcl и Tk — версия 8.4 в среднем в 8 раз быстрее чем версия 7.6<ref name="bench" />. Текущая версия TCL — 8.6. ==== Альтернативные реализации и диалекты ==== Существует альтернативные реализации Tcl для популярных [[виртуальная машина|виртуальных машин]] общего назначения. Это написанный на [[Java]] интерпретатор — Jacl<ref>[http://tcljava.sourceforge.net/ The Tcl/Java Project, Jacl]</ref> (последняя версия от 2008 года), и проект Eagle<ref>[http://eagle.to/ The Eagle Project, (Extensible Adaptable Generalized Logic Engine)]</ref>, реализующий большинство команд Tcl 8.4 для [[CLR]] (Доступны сборки для [[.NET Framework|.NET]] 4.0 и 2.0). Ведутся эксперименты по трансляции Tcl программ в код виртуальной машины [[Parrot]], разрабатываемой для шестой версии [[Perl]]<ref>[http://code.google.com/p/partcl/ partcl. Implementation of tcl targeting the parrot VM] ([http://partcl.blogspot.com/ блог проекта]){{ref-en}}</ref>. Для программирования [[Встраиваемая система|встраиваемых систем]] и встраивания в приложения разработан специальный диалект Tcl Jim<ref>[http://jim.tcl.tk/ The Jim Interpreter. A small footprint implementation of the Tcl programming language]</ref>. Это интерпретатор реализующий большое подмножество Tcl, расширенное дополнительными механизмами [[Объектно-ориентированное программирование|объектно-ориентированного]] и [[Функциональное программирование|функционального]] программирования и занимающий в скомпилированном виде менее 100 килобайт. Ещё один диалект Tcl — скриптовый язык мобильных устройств Hecl<ref>[http://www.hecl.org/ hecl.org]: Hecl — The Mobile Scripting Language</ref>, разработанный Дэвидом Велтоном и реализованный на [[Java]] ([[J2ME]])<ref>{{статья|автор=David Welton|заглавие=Create a simple application with Hecl|ссылка=http://www.freesoftwaremagazine.com/articles/creating_a_simple_application_with_hecl|издание={{нп3|Free Software Magazine}}|год=Wed, 2007-10-31|выпуск=[http://www.freesoftwaremagazine.com/issues/issue_020 20]}}</ref><ref>[http://www.welton.it/articles/hecl_implementation.html Implementation of the Hecl Programming Language]{{ref-en}}</ref>. Что же касается платформы [[Android]], поддержку Tcl на ней (наряду с другими скриптовыми языками) обеспечивает скриптовая прослойка [[SL4A]]<ref>[http://code.google.com/p/android-scripting/ android-scripting. Scripting Layer for Android brings scripting languages to Android.]</ref>. === Дистрибутивы === Все нижеперечисленные дистрибутивы распространяются свободно и собраны из компонентов, имеющих ту или иную [[Свободное программное обеспечение|свободную лицензию]]. Большинство из них — [[Кроссплатформенное программное обеспечение|кроссплатформены]] (кроме ''WinTclTk'' и ''Tcl/Tk Aqua''), хотя в [[Unix]]-системах Tcl/Tk обычно является частью дистрибутива [[Операционная система|ОС]]. * '''ActiveTcl'''<ref>[http://www.activestate.com/activetcl ActiveTcl. The Industry-Standard Tcl Distribution]</ref> *: Самый распространённый дистрибутив TCL. Подобно другим продуктам компании [[ActiveState]] включает в себя большой набор библиотек и расширений. В windows-версиях включает в себя средства интеграции с [[WSH]]. Какие либо [[Инструментальное программное обеспечение|инструментальные средства]], облегчающие жизнь программиста, отсутствуют. Фирма продаёт пакет TclDevKit содержащий средства отладки и создания автономных программ (последнее на базе технологии [[MetaKit#StarKit|StarKit]]) и [[Komodo]] — универсальное [[Интегрированная среда разработки|IDE]] для скриптовых языков, включающее средства визуального программирования [[Tk]]-форм. * '''WinTclTk'''<ref>[http://wintcltk.sourceforge.net/ WinTclTk. Tcl/Tk Distribution for Microsoft Windows]</ref> *: Более компактный, чем ActiveTcl, дистрибутив ориентированный на работу с [[XOTcl]] — объектно-ориентированным расширением Tcl. Список включённых в него библиотек несколько уже, чем в ActiveTcl, но «джентльменский набор» вы здесь найдёте. В этот дистрибутив входят Tloona IDE<ref>[http://tloona.sourceforge.net/ Tloona Tcl/Tk IDE]</ref> — [[Интегрированная среда разработки|среда разработки]] традиционного типа и XOTclIde<ref>[http://www.xdobry.de/xotclIDE/ XOTclIDE. Integrated Development Environment for XOTcl and Tcl]</ref> — среда объектно-ориентированного программирования в стиле [[Smalltalk]], обе — с отладчиками. Также на сайте разработчиков свободно доступен пакет для создания единого запускаемого файла TkWrapper основанный на FreeWrap<ref>[http://freewrap.sourceforge.net/ FreeWrap. Builds stand-alone TCL/TK executables. No compiler required!]</ref> — технологии, альтернативной [[MetaKit#StarKit|StarKit]], основанной на простом [[ZIP]]-сжатии. Последняя на сегодняшний день версия — 8.5.6 (3 декабря 2009, Tcl 8.5.6). * '''TclKit'''<ref>[http://www.equi4.com/tclkit/ Tclkit application runtime]</ref> *: Это Tcl/Tk c базовым набором библиотек в одном компактном выполняемом файле. Дистрибутив создан с использованием технологии [[MetaKit#StarKit|StarKit]]. Содержит Библиотеку [[MetaKit]] позволяющую управлять содержанием этого файла. Ещё один популярный дистрибутив Tcl в одном файле — это '''eTcl'''<ref>[http://www.evolane.com/software/etcl/index.html ETcl. Evolane’s distribution of Tcl/Tk]</ref>. На аналогичных принципах построен дистрибутив '''dqkit'''<ref>[http://sourceforge.net/projects/dqsoftware dqkit]</ref> — альтернативная сборка, известная как «TclKit на стероидах», имеется несколько вариантов, отличающихся составом библиотек, поддержкой многопоточности и т. д. * '''MyTcl'''<ref>[http://mytcl.tcltk.co.kr/doku.php MyTcl. Powerful Tcl/Tk IDE]</ref> *: Полноценная [[интегрированная среда разработки]] (IDE) на Tcl, включающая в себя дистрибутив языковой среды. Имеет возможность генерации автономных приложений в [[MetaKit|StarKit]] формате. Текущая версия 1.0 Build 8 (18 июня 2012) для Win32 и Win64 с интегрированным в систему Tcl 8.5.11. В настоящее время '''не''' является [[Открытое программное обеспечение|открытым ПО]]. == Применение == Tcl, наряду с [[Perl]] и [[Python]], стал одним из трёх классических скриптовых языков общего назначения. Эта троица фигурирует не только в качестве списка свободных дистрибутивов, собираемых в [[ActiveState]], но и, например, как языки, на которых (помимо диалекта [[PL/pgSQL]]) можно писать [[триггер (базы данных)|триггеры]] и [[хранимая процедура|хранимые процедуры]] популярного сервера БД [[PostgreSQL]]. Tcl, как встраиваемый язык, нашёл применение и в сфере [[САПР]] ([[САПР|CAD]]|[[CAM]]|[[Computer-aided engineering|CAE]])<ref>[http://wiki.tcl.tk/12092 CAD software history] в [http://wiki.tcl.tk/ TclWiki]</ref><ref>[http://www.sapr.ru/article.aspx?id=7985&iid=322 Современные компьютерные технологии на службе Nike, Inc.] в журнале [http://www.sapr.ru/ САПР и графика], № 10’2000</ref>. Он, к примеру, используется как средство настройки баз данных, в постпроцессоре [[Unigraphics]]. Кроме того, он де-факто является языком автоматизации и интеграции во всех ведущих программных пакетах разработки микросхем ([[ПЛИС]] и [[ASIC]]). === Использование в веб-разработке === В web-программировании Tcl обычно используется вместе с веб-сервером [[AOLServer]] или одним из «облегчённых» веб-серверов, вроде [[lighttpd]], ориентированным на [[FastCGI]]. Для интеграции Tcl с [[Apache]] существует модуль Rivet<ref>[http://tcl.apache.org/rivet/ Rivet — Webscripting for Tcl’ers]</ref>. Под управлением AOLServer работает в частности OpenACS<ref>[http://openacs.org/ OpenACS. The Toolkit for Online Communities]{{ref-en}}</ref> — [[система управления содержимым]] вебсайтов с богатыми возможностями расширения на языке Tcl, расширенном [[XOtcl]] или project-open<ref>[http://www.project-open.org/ project-open. Open-Source Enterprise Project Management]{{ref-en}}</ref> — [[Система управления документами|система групповой работы]] c [[веб-интерфейс]]ом. Известен также форк AOLServer — NaviServer<ref>[http://wiki.tcl.tk/2090 NaviServer] on Tclers Wiki</ref>. Существуют также такие проекты, как TclHttpd<ref>[http://www.tcl.tk/software/tclhttpd/ tclhttpd — Tcl Web Server]</ref> и его преемник — Wub<ref>[http://code.google.com/p/wub/ Wub pure tcl HTTP1.1 server, client and tool suite]</ref>, являющиеся полноценными Web-[[фреймворк]]ами. На базе нового объектного расширения языка TclOO разрабатывается веб-фреймвок Woof (Web Oriented Object Framework)<ref>[http://woof.magicsplat.com/ Woof. Web Oriented Object Framework]</ref>. Примером CMS для TclHttpd является Ucome<ref>[http://code.google.com/p/ucome/ Ucome. Your Content Management in Tcl]{{ref-en}}</ref>. Помимо использования в качестве языка реализации веб-приложений, TCL может использоваться как скриптовый язык для расширения существующих приложений. К примеру на нём пишут модули для IRC бота [[Eggdrop]]. === Прочее === Среди программного обеспечения на Tcl можно также назвать следующие разработки: * [[tkabber]], это программа для работы с протоколом [[XMPP]], включающая в себя [[чат]] и другие функции. * [[AMSN]] — программа с открытым исходным кодом для мгновенного обмена сообщениями * [[Html Viewer 3]] — минималистичный [[web-браузер]], написанный на Tcl/Tk * [[MacPorts]] — система для установки программного обеспечения, распространяемого в исходных кодах, для операционной системы [[Mac OS X]]. * {{нп3|TclMon}}<ref>[http://tclmon.sourceforge.net/ TclMon. Open Source Cross-Platform Network Monitoring Solution]</ref> — система мониторинга сетей * ''gitk''<ref>[http://wiki.tcl.tk/14598 gitk] on Tclers Wiki</ref><ref>[http://gitolite.com/1-basic-usage/gitk.html#1_basic_usage_gitk_the_missing_gitk_documentation_ the missing gitk documentation], Sitaram Chamarty. everything I know about git</ref><ref>{{книга|автор=Scott Chacon|часть=2.3 Основы Git - Просмотр истории коммитов|заглавие=Pro Git|ссылка=http://git-scm.com/book/ru/Основы-Git-Просмотр-истории-коммитов|издание=1 edition|издательство=Apress|год=August 27, 2009|серия=Expert's Voice in Software Development|isbn=1430218339 978-1430218333}}</ref> — графический интерфейс для визуализации истории [[Git]]. Написан на Tcl/Tk, распространяется с самим Git. == Достоинства и недостатки == Недостатком ранних версий Tcl/Tk, несомненно, было низкое быстродействие. Версии ниже 8-й использовали прямую интерпретацию исходного текста, однако использование [[байткод]]а разрешило эту проблему. Сейчас по быстродействию Tcl не сильно отличается от [[PHP]]<ref>[http://shootout.alioth.debian.org/gp4/benchmark.php?test=all&lang=tcl&lang2=php Computer Language Benchmarks Game] — сравнение производительности языков программирования. </ref>, хотя заметно уступает таким скриптовым языкам как, например, [[Python]] или [[Lua]]. Сложные или [[Критический участок кода|критические по времени выполнения участки кода]] рекомендуется выполнять в виде внешних модулей на [[Си (язык программирования)|C]]/[[C++]]. Tcl/Tk, отличает непривычность синтаксиса для программистов на «традиционных» языках. Он ближе к стандартному синтаксису [[Командная оболочка UNIX|оболочки Unix]]. Этот синтаксис может быть произвольно изменён (как и в других «программируемых языках программирования», таких как [[Forth]]<ref>Интересен симбиозе Forth и Tcl в рамках проекта [http://holonforth.com/new/tcl/holont.html HolonT], где Forth транслируется в Tcl код.</ref> или [[Common Lisp]]). Это может быть преимуществом для программиста-индивидуала или небольшой группы программистов, но делает Tcl/Tk вряд ли пригодным для использования в качестве языка общего назначения при разработке в промышленном масштабе. Хотя наличие стандартизированных расширений снижает остроту этой проблемы. Tcl может использоваться и в крупных проектах в пределах своей «экологической ниши» (встроенные скрипты, «склеивание» компонент, WEB-программирование). Хотя Tcl обладает всеми свойствами [[Функциональное программирование|функционального языка]], его интерпретатор до версии 8.6 не производил оптимизацию хвостовой рекурсии, что затрудняло использование чисто функционального стиля, уменьшало его эффективность. Впрочем, гибкость языка позволяет обойти эту проблему, реализовав подобие такой оптимизации на высоком уровне<ref>в [http://wiki.tcl.tk/1348 Tail call optimization] описана эта проблема и обозначены возможные пути её решения.</ref>. Наконец, появившаяся в тестовой версии 8.6 команда ''tailcall'' позволяет без особых проблем использовать хвостовую рекурсию. Наиболее тесная интеграция Tcl с [[графический интерфейс пользователя|графической]] [[библиотека (программирование)|библиотекой]] [[Tk]], которая зачастую используется и в сочетании с другими языками программирования — несомненное преимущество Tcl. Для создания [[GUI]] оболочек к [[консольная программа|консольным программам]] или пакетам консольных программ Tcl может оказаться наилучшим выбором. == См. также == {{Портал|Свободное программное обеспечение|}} * [[Tk]] * [[Forth]] * [[SQLite]] * [[Perl]] * [[Expect]] == Ссылки == * [http://www.tcl.tk/ www.tcl.tk]{{ref-en}} — Официальный сайт * [http://wiki.tcl.tk/ wiki.tcl.tk]{{ref-en}} — Tcl Wiki: Ресурс, посвящённый Tcl * [http://www.tcl.tk/man/tcl8.5/tutorial/tcltutorial.html Tcl 8.5 Tutorial]{{ref-en}} * [http://www.tcl.tk/man/tcl8.6/contents.htm Tcl/Tk 8.6.1 Documentation]{{ref-en}} * [http://www.tkdocs.com/ TkDocs site]{{ref-en}} * [http://tmml.sourceforge.net/doc/ tmml.sourceforge.net/doc]{{ref-en}} — Официальная документация по Tcl/Tk и стандартной библиотеке Tcl * [[:en:b:Tcl Programming]] {{ref-en}} — Викиучебник «Программирование на TCL» * [http://pleac.sourceforge.net/pleac_tcl/index.html pleac.sourceforge.net/pleac_tcl]{{ref-en}} — PLEAC-Tcl — Коллекция решённых на Тикле задач (удобна для сравнения с другими языками) === На русском языке === * [http://www.opennet.ru/links/sml/36.shtml www.opennet.ru/links/sml/36.shtml] — Ссылки на русскую документацию * [http://community.livejournal.com/ru_tcl/ community.livejournal.com/ru_tcl] — Сообщество программистов на Tcl * [http://www.cs.tut.fi/~yk/ns2ru/tcl.html www.cs.tut.fi/~yk/ns2ru/tcl.html] — Краткое введение в TCL * [http://tclstudy.narod.ru/index.html tclstudy.narod.ru/index.html] — Уроки для самостоятельного освоения tcl и tk * [http://www.cs.tut.fi/~yk/ns2ru/otcl.html www.cs.tut.fi/~yk/ns2ru/otcl.html] — Введение в OTCL * [http://chatlogs.jabber.ru/tcl@conference.jabber.ru http://chatlogs.jabber.ru/tcl@conference.jabber.ru] — История сообщений Jabber-конференции по Tcl ; Блоги, посвящённые TCL * [http://geomapx.blogspot.com/search/label/Tcl geomapx.blogspot.com] — Описание некоторых компонент фрэймворка для AOL Server, патчи для tclsqlite и AOL Server, библиотеки и скрипты. * [http://etcl.ru/ etcl.ru] — Про Tcl/Tk от Evolane и его применения в простых задачах * [http://www.siftsoft.com/tcl/index.html Достойные статьи от A. Kovalenko] ==== Статьи и Обзоры ==== * [http://www.osp.ru/os/1998/03/179470/ Сценарии: высокоуровневое программирование для XXI века] — статья Джона Остераута (создателя Tcl) о сценарных языках. * [http://itc.ua/?s=%D0%94%D1%80%D0%B5%D0%B2%D0%BD%D1%8F%D1%8F+%D0%BD%D0%BE%D0%B2%D0%B0%D1%8F+%D0%B1%D1%83%D0%B4%D1%83%D1%89%D0%B0%D1%8F Древняя, новая, будущая], цикл статей Андрея Зубинского в «Компьютерном Обозрении». * [http://www.citforum.ru/database/postgres/tcl.shtml Доступ к PostgreSQL из программ на языке Tcl] — статья на [http://www.citforum.ru/ CitForum] е * [http://www.ibm.com/developerworks/ru/library/au-tcldsktop/ Вильям Б. Циммерли. Технология Tcl] — Используйте Tcl/Tk для организации рабочего стола и автоматизации вашей работы == Книги == === На русском языке === <!--* {{книга |автор = Брент Б. Уэлш, Кен Джонс, Джеффри Хоббс |заглавие = Практическое программирование на Tcl и Tk |оригинал = Practical Programming in Tcl and Tk |ссылка = |издание = 4-е изд |место = М. |издательство = [[Вильямс (издательство)|«Вильямс»]] |год = 2004 |страницы = 1136 |isbn = 0-13-038560-3 }} дублирует следующую книгу с потерей ISBN перевода --> * Брент Б. Уэлш, Кен Джонс, Джеффри Хоббс «Практическое программирование на Tcl и Tk», ISBN 5-8459-0661-X, : оригинал: Brent Welch, Ken Jones, Jeffrey Hobbs «Practical Programming in Tcl and Tk (4th Edition)», ISBN 0-13-038560-3, 2003 ([http://www.beedub.com/book/ электронная версия]<ref>полностью доступно первое издание, выборочно, более новые</ref>) * Москвин П. В. «Азбука TCL», ISBN 5-93517-130-9 * Алексей Петровский, Командный язык программирования TCL (Tool Command Language), ISBN 5-901321-16-2 === На английском языке === * Clif Flynt «Tcl/Tk, Second Edition : A Developer’s Guide», ISBN 1-55860-802-8, 2003 : 1-е издание «Tcl/Tk for Real Programmers», ISBN 0-12-261205-1 * John K. Ousterhout, Ken Jones «Tcl and the Tk Toolkit (2nd Edition)», ISBN 032133633X, 2009 * Bert Wheeler «[http://www.packtpub.com/tcltk-8-programming-cookbook/book Tcl/Tk 8.5 Programming Cookbook]», ISBN 1849512981, 2011 * Wojciech Kocjan, Piotr Beltowski «[http://www.packtpub.com/tcl-8-5-network-programming/book Tcl 8.5 Network Programming]», ISBN 1849510962, 2010 * Mark Harrison, Michael McLennan, «Effective Tcl/Tk Programming. Writing Better Programs in Tcl and Tk», ISBN 0-201-63474-0 * J. Adrian Zimmer «Tcl/Tk For Programmers», ISBN 0-8186-8515-8 * Lakshmi Sastry Advanced Interactive Systems Group «Tcl/Tk Cookbook» * Salvatore Sanfillipo «Tcl Wise. Guide to the Tcl Programming Language» ([http://www.invece.org/tclwise/ первые 9 глав on-line]) * Paul Raines, Jeff Tranter «Tcl/Tk in a Nutshell: A Desktop Quick Reference», ISBN 1-56592-433-9 * Chad Smith «[incr Tcl/Tk] from the Ground Up», ISBN 0-07-212106-8 * David Maggiano «CGI Programming with Tcl», ISBN 0-201-60629-1 * J. M. Ivler, Kamran Husain, «Cgi Developer’s Resource: Web Programming in Tcl and Perl», ISBN 0-13-727751-2 == Примечания == {{примечания|2}} {{Языки программирования}} {{Хорошая статья|Компьютер|Информатика}} [[Категория:Языки программирования семейства Tcl]] [[Категория:Скриптовые языки]] [[Категория:Объектно-ориентированные языки программирования]] [[Категория:Свободные компиляторы и интерпретаторы]]'