Tcl

Tcl （正體）

TCL也是中国大陆一个家电品牌

Tcl (最早称为“工具命令语言”"Tool Command Language", 但是目前已经不是这个含义，不过我们仍然称呼它为TCL)是一种 脚本语言。 由John Ousterhout创建。 TCL很好学，功能很强大。TCL经常被用于 快速原型开发,脚本编程， GUI和测试等方面。TCL念作“踢叩” "tickle". Tcl的特性包括:

• 任何东西都是一条命令，包括语法结构(for, if等)。
• 任何事物都可以重新定义和重载。
• 所有的数据类型都可以看作字符串。
• 语法规则相当简单
• 提供事件驱动给Socket和文件。基于时间或者用户定义的事件也可以。
• 动态的域定义。
• 很容易用C, C++,或者Java扩展。
• 解释语言，代码能够动态的改变。
• 完全的Unicode支持。
• 平台无关。Win32, UNIX, Mac 上都可以跑。
• 和Windows的GUI紧密集成。 Tk
• 代码紧凑，易于维护。

TCL本身不提供面向对象的支持。但是语言本身很容易扩展到支持面向对象。许多C语言扩展都提供面向对象能力，包括XOTcl, Incr Tcl 等。另外SNIT扩展本身就是用TCL写的。

使用最广泛的TCL扩展是TK。 TK提供了各种OS平台下的图形用户界面GUI。连强大的Python语言都不单独提供自己的GUI，而是提供接口适配到TK上。 另一个流行的扩展包是Expect. Expect提供了通过终端自动执行命令的能力，例如(passwd, ftp, telnet等命令驱动的外壳).

扩充套件

Tcl 支援扩充套件，这些扩充套件提供了额外的功能（像是 GUI，自动化，数据库存取等）。

下面是一些 Tcl 扩充套件的列表:

• tclodbc
• mk4tcl
• sqlite
• Pgtcl, pgintcl
• mysqltcl, msqltcl
• AdabasTcl
• FBSQL
• ibtcl
• Oratcl
• Sybtcl
• db2tcl
• 以及还有更多、更多 - 请参考 Tcl/Tk Wiki, 特别是 Tcl/Tk Wiki Database Category.

范例

下面是TCL程序的例子：

#!/bin/sh
# next line restarts using tclsh in path \
exec tclsh $0 ${1+"$@"}

# echo server that can handle multiple 
# simultaneous connections.

proc newConnection { sock addr port } {
     
     # client connections will be handled in
     # line-buffered, non-blocking mode
     fconfigure $sock -blocking no -buffering line

     # call handleData when socket is readable
     fileevent $sock readable [ list handleData $sock ]
}


proc handleData { sock } {
     puts $sock [ gets $sock ]
     if { [ eof $sock ] } {
        close $sock
     }
}

# handle all connections to port given
# as argument when server was invoked
# by calling newConnection
set port [ lindex $argv 0 ]
socket -server newConnection $port

# enter the event loop by waiting
# on a dummy variable that is otherwise
# unused.
vwait forever

另外一个TK的例子 (来自 A simple A/D clock) 它使用了定时器时间，3行就显示了一个时钟。

 proc every {ms body} {eval $body; after $ms [info level 0]}
 pack [label .clock -textvar time]
 every 1000 {set ::time [clock format [clock sec] -format %H:%M:%S]} ;# RS

解释：第一行定义了过程every， 每隔ms毫秒，就重新执行body代码。第二行创建了标签起内容由time变量决定。第3行中设置定时器，time变量从当前时间中每秒更新一次。

外部连接

• Tcl Documentation
• Tcl语言中文网
• Main Tcl developer site
• ActiveState's Tcl distribution with extensions
• Tcl FAQ
• Tcl'ers Wiki
• Tcl Contributed Sources Archive
• Citations from CiteSeer

查 • 论 • 编 • 历 程序设计语言
工业编程语言	A+ - ActionScript - Ada - 汇编语言 - B - Brainfuck - COBOL - Curl - D - Eiffel - Erlang - FORTRAN - IronPython - Java - JavaScript - JScript - Jython - LISP - Lua - SCILAB - MATLAB - MATHEMATICA - Nuva - Oberon - OCaml - Perl - PHP - PostScript - Powerbuilder - Python - R - REXX - Ruby - Self - Smalltalk - Tcl/Tk - C# - F# - J# - Microsoft Visual C#
C/C++语言	C - C++ - Turbo C++ - Borland C++ - C++ Builder- C++/CLI - Objective-C - Microsoft Visual C++
BASIC语言	BASIC - BASICA - GW-BASIC - QBASIC - QuickBASIC - True BASIC - Turbo BASIC - PowerBASIC - DarkBASIC -ETBASIC Visual Basic .NET - Visual Basic - VBScript - VBA
Pascal/Delphi语言	Pascal语法：（Pascal - Turbo Pascal - Object Pascal - Free Pascal） Pascal+Delphi语法：（Delphi）
GPU用着色器语言	Cg - GLSL - HLSL
学术编程语言	APL/J - Clean - Haskell - Logo - ML - Prolog - Scheme - SAC
数据库相关编程语言	Clipper - Visual FoxPro - SQL - SQL預存程序
其他编程语言	ALGOL - Forth - Modula-2/Modula-3 - MUMPS - PL/I - Simula

! __

Why are we here?
All text is available under the terms of the GNU Free Documentation License
This page is cache of Wikipedia. History