Tcl

Tcl

Уебсайт	tcl.sourceforge.net

Tcl е скриптов език за програмиране, създаден през 1988 г от проф. Джон Оустерхаут в Университета на щата Калифорния, гр. Бъркли. Произнася се като „тикъл” или „тисиел” е съкращение от tool command language. Първоначално Tcl е замислен от своя създател като компютърен език предназначен за комуникация между отделните програми (програмите да могат да си взаимодействат (комуникират) по между си като извикват команди на Tcl), а също така и като език за оптимизиране и конфигуриране на програми. В последното отношение Tcl може да се оприличи на VBA, който също се използва за внасяне на допълнителна функционалност в приложенията на MS Office. Също като други подобни успешни проекти в областта на информатиката, като Perl, Python, VBA и други, Tcl отдавна е надхвърлил очакванията на своя създател и днес той е един напълно функционален програмен език. По своята същност Tcl е интерпретаторен език което означава че е напълно крос-платформен – практически една програма написана на езика може да тръгне под всяка една операционна система, където има инсталиран интерпретатор на езика. Tcl притежава същите възможности, като другите популярни интерпретаторни езици Python, Perl, Ruby, включително и обектно–ориентирано програмиране. Езикът поддържа структури като списъци и масиви, като последните са аналогични на речниците в Python и според доста програмисти са значително по–лесни за употреба.

Едно от основните предимства на езика е че е значително по-лесен за научаване и употреба от останалите. Изграждането на графични интерфейси чрез Tk е забележимо лесно и просто, неимоверно по–просто в сравнение с Python например. Редица програмисти предпочитат Tcl именно заради лесното и бързо създаване на крос платформени програми с графичен интерфейс. Допълнително са налице GUI building tools като Visual Tcl и Spec Tcl, които са напълно безплатни.

Понастоящем Tcl се използва от такива компании като IBM, Motorola, Oracle, TiVo и др.

От сайта на Active State може да се изтегли безплатно интерпретатора който има версии за различни операционни системи - Windows, Линукс, Mac OS. В повечето от Линукс дистрибуциите, интерпретаторът е вграден и не е нужно допълнителното му сваляне. Под Линукс се извиква с командата tclsh. За да се програмират графични приложения с Tk, обаче е нужно извикването на wish.

Примери

Примерният код по-долу може да се изпълни в Tcl шел.

Събиране на числа

Метод (A) - Събиране чрез използване на 'foreach'

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

Метод (B) - По-елегантен начин за събиране на числа чрез командата 'join'

 set numbers {1 2 3 4 5 6 7 8 9 10}
 puts [expr [join $numbers +]]