Movatterモバイル変換


[0]ホーム

URL:


跳转到内容
维基百科自由的百科全书
搜索

Tcl

本页使用了标题或全文手工转换
维基百科,自由的百科全书
此条目的主題是一种编程语言。关于与「Tcl」標題相近或相同的条目,請見「TCL」。
Tcl
编程范型多泛型面向对象函数式过程式事件驱动指令式
設計者John Ousterhout英语John Ousterhout
實作者John Ousterhout、Tcl核心團隊
发行时间1988年
当前版本
  • 9.0.3(2025年11月13日;穩定版本)[1]
編輯維基數據鏈接
型態系統动态类型、万物皆可视作字符串
文件扩展名.tcl
網站www.tcl.tk
主要實作產品
ActiveTcl
受影响于
AWKLisp
影響語言
PowerShell[2]Tea英语Tea (programming language)

Tcl(发音tickle)是一种脚本语言。由John Ousterhout英语John Ousterhout创建。TCL经常被用于快速原型开发RAD、脚本编程、GUI编程和测试等方面。

特性

[编辑]

Tcl 的特性包括:

  • 任何东西都是一条命令,包括语法结构(for、if等),以波兰表示法书写。
  • 命令通常可变。
  • 任何事物都可以重新定义和重载。
  • 所有的数据类型都可以看作字符串,包括源代码。
  • 拥有完全动态、基于类的对象系统 TclOO,支持包括元类、过滤器和mixin在内的高级功能。
  • 提供事件驱动套接字文件。基于时间或者用户定义的事件也可以。
  • 默认的变量作用域是词法作用域,但uplevelupvar 允许过程与封闭的函数作用域交互。
  • 所有的内置命令会在误用时产生错误消息。
  • 很容易用 C、C++ 或者 Java 扩展。
  • 解释语言,支持字节码
  • 完全的Unicode (3.1)支持,1999 年首次发布。
  • 跨平台。支持Win32UNIXLinuxMac 等。
  • 和GUI开发套件Tk 紧密集成。
  • 代码紧凑,易于维护。
  • 存在多种发行版:
    • Batteries-Included 版本,如 ActiveState ActiveTcl
    • tclkit,一种单文件运行时环境,仅有 1 兆大小
    • starpack,脚本/程序的单文件的可执行文件,派生自 tclkit 技术
    • freewrapTCLSH[3] 将 Tcl 脚本打包为单个可执行二进制文件。
    • BSD licenses,自由可再发行的源代码。

旧版 Tcl 没有内置面向对象功能,因此许多 OO 库以扩展形式涌现出来,如incr TclXOTcl,甚至存在纯脚本编写的 OO 包,如SnitSTOOOP(simple Tcl-only object-oriented programming),8.6 版本在内核中提供了 OO 功能[4]

Safe-Tcl 是功能受限的 Tcl 子集。文件系统访问受限,任意系统命令禁止执行。它使用双解释器模型,在“不可信解释器”中运行不可信脚本中的代码。由Nathaniel BorensteinMarshall Rose 设计,借以在电子邮件中包含活动信息,当支持application/safe-tclmultipart-enabled-mail 时,Safe-Tcl 即可包含于电子邮件中。Safe-Tcl 功能已整合在标准 Tcl/Tk 发布中。[5][6]

扩展包

[编辑]

Tcl 支持扩展包,这些扩展包提供了附加功能(像是GUI,终端程序自动化,数据库访问等)。常用的扩展包有:

Tk
Tk 工具包是最流行的 Tcl 扩展,在多种操作系统上提供图形用户界面。每个 GUI 由一个或多个框架(framework)组成,每个框架内含布局管理器。
Expect
Expect是另外一种非常流行的 Tcl 扩展。早期,Expect 对 Tcl 在多种领域的流行居功甚伟,如在测试领域中,时至今日 Expect 依然被大量使用于 telnet、ssh 与串口会话的重复任务自动化,即对仅有终端交互接口的程序进行编程。Tcl 是运行 Expect 的唯一方式,因此 Tcl 在此类工业领域中十分流行。
Tile/Ttk
Tile/Ttk[7] 是风格和主题化控件集,可替代 Tk 中大多数控件,真正调用操作系统API 实现原生界面。这种方式提供的主题包括Windows XP、Windows Classic、QtAqua(Mac OS X)。主题也可使用图片pixmap 加上一定定义构造,避免调用系统 API。以这种方式创建的主题有 Classic Tk、Step、Alt/Revitalized、Plastik 和 Keramik。Tcl 8.4 中,此包称作 Tile,在 8.5 中以 Ttk 的名字进入 Tk 核心发布。
Tix
Tix(Tk Interface eXtension)是一套开源的、用于扩充 Tcl/Tk 和 Python 应用程序功能的用户界面组件。由 Tix Project Group 维护,以 BSD 风格许可发布。[8]
Itcl/IncrTcl
Itcl 是 Tcl 诸多对象系统中的一种,通常称为 [incr Tcl](递增 Tcl 之意,类似 C++ 之名)。
Tcllib
Tcllib 是一套纯脚本 Tcl 包,无需编译。
TclUDP
TclUDP[9] 提供简捷的方式支持UDP 套接字。
数据库
Tcl 数据库互联(Tcl Database Connectivity,TDBC)是 Tcl 8.6 的一部分,为 Tcl 脚本提供常用数据库的访问接口,目前驱动器支持MySQLODBCPostgreSQLSQLite 数据库。更多数据库已经有了计划。同样,也可使用许许多多数据库专用的扩展包访问数据库。[10]

範例

[编辑]

下面是TCL程序的例子:

#!/bin/sh# next line restarts using tclsh in path \exec tclsh $0 ${1+"$@"}# echo server that can handle multiple# simultaneous connections.procnewConnection{sockaddrport}{# client connections will be handled in# line-buffered, non-blocking modefconfigure$sock-blockingno-bufferingline# call handleData when socket is readablefileevent$sockreadable[listhandleData$sock]}prochandleData{sock}{puts$sock[gets$sock]if{[eof$sock]}{close$sock}}# handle all connections to port given# as argument when server was invoked# by calling newConnectionsetport[lindex$argv0]socket-servernewConnection$port# enter the event loop by waiting# on a dummy variable that is otherwise# unused.vwaitforever

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

procevery{msbody}{eval$body;after$ms[infolevel0]}pack[label.clock-textvartime]every1000{set::time[clockformat[clocksec]-format%H:%M:%S]};# RS

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

参考资料

[编辑]
  1. ^[TCLCORE] Tk 9.0.3 RELEASED. 2025年11月13日 [2025年11月13日]. 
  2. ^PowerShell and WPF: WTF. [2022-03-06]. (原始内容存档于2008-12-25). 
  3. ^freewrapTCLSH页面存档备份,存于互联网档案馆
  4. ^8.6 版本在内核中提供了 OO 功能页面存档备份,存于互联网档案馆
  5. ^Brown, Lawrie.Mobile Code Security. Terry Bossomaier, Lucy Chubb (编). Proceedings, 2nd Joint Conference, AUUG '96 and Asia-Pacific WWW '96. Melbourne, Australia: 50. September 18–20, 1996 [2011-03-22]. (原始内容存档于2011-05-11). 
  6. ^Welch, Brent B.; Jones, Ken; Hobbs, Jeffrey. Practical programming in Tcl and Tk1 4th. Prentice Hall PTR. 2003: 291.ISBN 0-13-038560-3. 
  7. ^TK Table Sourceforge Project. ActiveTcl. [August 7, 2012]. (原始内容存档于2014-07-13). 
  8. ^Tix License. Sourceforge. [August 7, 2012]. (原始内容存档于2013-03-22). 
  9. ^TCL UDP. Tcl'ers Wiki. [August 7, 2012]. (原始内容存档于2015-01-04). 
  10. ^TDBC. Tcl'ers Wiki. [August 7, 2012]. (原始内容存档于2009-05-29). 

外部链接

[编辑]
維基教科書中的相關電子教程:Tcl 编程
维基共享资源上的相关多媒体资源:Tcl
范型分类
过程式
面向对象
多范型
函数式
逻辑式
脚本语言
动态语言
外壳脚本
客户端脚本
特定平台
.NET
JVM
特定领域
科学计算
GPU计算
数据查询
可视化
传媒设计
其它语言
常见概念与条目
操作系统(内核)
AROS Research Operating System英语AROS · BSD · Darwin · FreeDOS · GNU Hurd · Haiku · Inferno · Linux · Mach · Minix · OpenSolaris · Plan 9 · ReactOS · Symbian · 開源鴻蒙
软件列表
歷史与运动
组织英语List of free and open-source software organizations社群
許可證
类型与标准
挑戰
其他
规范控制数据库:各地編輯維基數據鏈接
检索自“https://zh.wikipedia.org/w/index.php?title=Tcl&oldid=77666054
分类:​
隐藏分类:​

[8]ページ先頭

©2009-2026 Movatter.jp