TCL.rar_tcl资源-CSDN文库

共1个文件

doc：1个

版权申诉

195 浏览量 2022-09-23 08:20:52 上传评论收藏 23KB RAR 举报

标题中的"TCL.rar_tcl"表明这是一个关于TCL编程语言的压缩文件，其中包含了一个名为"TCL.doc"的Word文档。TCL（Tool Command Language）是一种动态编程语言，以其简单易学、高度可扩展性以及在脚本编写、自动化任务处理、系统管理等方面的应用而闻名。 TCL编程简介： TCL起源于1980年代，由John Ousterhout教授开发。它的设计目标是提供一种轻量级、易于学习和使用的脚本语言，用于快速构建原型系统和工具。TCL的核心特性包括其简洁的语法，使得编写脚本变得直观，如命令行操作一样简单。TCL的语法特点是使用等号"="进行赋值，使用花括号"{...}"来包围代码块。 TCL的关键概念： 1. **命令式风格**：TCL是一门命令式语言，意味着它通过执行一系列命令来改变程序状态。 2. **动态类型**：所有TCL变量都是动态类型的，无需预先声明变量类型。 3. **字符串操作**：TCL非常擅长处理字符串，提供了丰富的字符串函数，如`string length`、`string index`和`string replace`等。 4. **列表**：TCL中的列表是一种强大的数据结构，可以用来存储和操作有序的数据集合。列表可以通过逗号或空格分隔的元素创建。 5. **控制结构**：TCL支持if-then-else条件语句、for和while循环，以及switch选择语句。 6. **命令定义**：TCL允许用户自定义命令，这极大地扩展了其功能。 7. **文件和I/O操作**：TCL提供了简单的API来读写文件，进行输入输出操作。 8. **正则表达式**：TCL内置了正则表达式的支持，可以方便地进行文本匹配和替换。 TCL的扩展和应用： TCL最著名的是它的扩展库Tk，这是一个用于创建图形用户界面（GUI）的库。结合TCL，它们共同构成了TCL/Tk，广泛用于快速开发跨平台的桌面应用程序。 1. **Tk**：Tk提供了一系列的窗口小部件，如按钮、文本框和滚动条等，用于构建GUI界面。 2. **Expect**：TCL的一个扩展，用于自动化与交互式程序的通信，如远程登录、文件传输等。 3. **Itcl/Itk**：这两者分别提供了面向对象的编程机制和面向组件的编程模型，增强了TCL的结构化编程能力。 "TCL.doc"文档可能详细介绍了TCL的基础语法、常用命令、典型应用案例以及如何使用Tk进行GUI编程等内容。通过阅读这份文档，初学者可以快速掌握TCL编程的基本概念，并能够着手编写简单的TCL脚本。对于熟悉其他编程语言的开发者来说，TCL的简洁性和易用性使其成为自动化任务和快速原型开发的理想选择。

资源推荐

资源详情

资源评论

收起资源包目录

TCL.rar （1个子文件）

TCL.doc 118KB

Tcl 编程简介

简介

　　Tcl 是一种很通用的脚本语言，它几乎在所有的平台上都可以解释运行，功能强大。是

tool command language 的缩写，发音为 "tickle”，实际上包含了两个部分：一个语言和一个

库。

　　首先，Tcl 是一种简单的脚本语言，主要使用于发布命令给一些互交程序如文本编辑器、

调试器和 shell。它有一个简单的语法和很强可扩充性，Tcl 可以创建新的过程以增强其内建

命令的能力。

　　其次，Tcl 是一个库包，可以被嵌入应用程序，Tcl 的库包含了一个分析器、用于执行

内建命令的例程和可以使你扩充（定义新的过程）的库函数。应用程序可以产生 Tcl 命令并

执行，命令可以由用户产生，也可以从用户接口的一个输入中读取（按钮或菜单等）。但

Tcl 库收到命令后将它分解并执行内建的命令，经常会产生递归的调用。

　　下面简单介绍以下 txl 的语法规则：

解释器

　　在 Tcl 的数据结构中的核心是 Tcl_Interp.一个解释器包含了一套命令，一组变量和一些

用于描述状态的东西。每一个 Tcl 命令是在特定的 Tcl_Interp 中运行的,基于 Tcl 的应用程序

可以同时拥有几个 Tcl_Interp。Tcl_Interp 是一个轻量级的结构，可以快速的新建和删除。

数据类型

　　Tcl 只支持一种数据结构：字符串（string）。所有的命令，命令的所有的参数，命令的

结果，所有的变量都是字符串。请牢记这一点，所有的东西都是字符串。这是它比较有特

点的方面字符串有三种形式：命令(command), 表达式(expresion)和表(list)。

Basic Command Syntax 基本语法

　　Tcl 有类似于 shell 和 lisp 的语法，当然也有许多的不同。一条 Tcl 的命令串包含了一

条或多条命令用换行符或分号来隔开，而每一条命令包含了一个域(field)的集合，域使用空

白分开的，第一个域是一个命令的名字，其它的是作为参数来传给它。

　　例如：

　　set a 22 //相当于 C 中的 a=22 a 是一个变量这条命令分为三个域：1： set 2： a 3： 22 set

使用于设置变量的值的命令，a、20 作为参数来传给它，a 使它要操作的变量名，22 是要付

给的 a 值。

　　Tcl 的命令名可以是内置的命令也可以是用户建的新命令，如果是用户用户建的新命令

应用程序中用函数 Tcl_CreateCommand 来创建。所有的参数作为字符串来传递，命令自己

会按其所需来解释的参数的。命令的名字必须被打全，但 Tcl 解释器找不到一同名的命令

时会用 unknown 命令来代替。

　　在很多场合下，unknown 会在库目录中搜寻，找到一个的话，会自动生成一个 Tcl 命

令并调用它。unknown 经常完成缩略的命令名的执行。但最好不要使用。

注释

　　和 shell 很象，第一个字母是"#"的 Tcl 字符串是注释。

其他细节规则

　　Grouping arguments with double-quotes 用双引号来集群参数，目的在于使用有空白的参

数。

　　例如：

set a "this string contains whitespace"

　　如够一个参数一双引号来开始，该参数会一直到下一个双引号才结束。其中可以有换行

符和分号。

　　Variable substitution with $ 用美元符进行变量替换说白了就是引用该变量。

　　如：

set a hello

set b $a // b = "hello" 实际上传给 set 命令的参数

//是 b,"hello"

set c a // b = "a"

　　Command substitution with brackets 命令子替换（用方括号）

　　例如:

set a [set b "hello"]

　　实现执行 set b "hello" 并用其结果来替换源命令中的方括号部分，产生一条新命令

　　set a "hello" //"hello" 为 set b "hello" 的返回值

　　最终的结果是 b="hello" a="hello"

　　当命令的一个子域以方括号开始以方括号结束，表示要进行一个命令子替换。并执行该

子命令，用其结果来替换原命令中的方括号部分。方括号中的部分都被视为 Tcl 命令。

　　如下一个复杂一点的例子：

set a xyz[set b "abc"].[set c "def"]

//return xyzabcdef

　　Backslash substitution 转移符替换

　　转移符时间不可打印字符或由它数意义的字符插入进来。这一概念与 C 语言中的一样。

Backspace (0x8).

f Form feed (0xc).

Newline (0xa).

Carriage-return (0xd).

Tab (0x9).

v Vertical tab (0xb).

{ Left brace (`{").

} Right brace (`}").

[ Open bracket (`[").

] Close bracket (`]").

$ Dollar sign (`$").

sp Space (` "): does not terminate argument.

; Semicolon: does not terminate command.

" Double-quote.

　　Grouping arguments with braces 用花扩括号来集群参数

　　用花扩括号来集群参数与用双引号来集群参数的区别在于：用花扩括号来集群参数其中

的三种上述的子替换不被执行。而且可以嵌套。

　　例如：

set a {xyz a {b c d}}//set 收到俩个参数 a "xyz a {b c d}"

eval {

set a 22

set b 33

}//eval 收到一个参数 "set a 22

set b 33"

命令综述

　　1.一个命令就是一个字符串（string）。

　　2.命令是用换行符或分号来分隔的。

　　3.一个命令由许多的域组成。第一个于是命令名，其它的域作为参数来传递。

　　4.域通常是有空白（Tab 横向制表健 Space 空格）来分开的。

　　5.双引号可以使一个参数包括换行符或分号。三种子替换仍然发生。

　　6.花括号类似于双引号，只是不进行三总体换。

　　7.系统只进行一层子替换，机制替换的结果不会再去做子替换。而且子替换可以在任何

一个域进行。

　　8.如果第一个非控字符是`#", 这一行的所有东西都是注释。

表达式

　　对字符串的一种解释是表达式。几个命令将其参数按表达式处理，如：expr、for 和

if,并调用 Tcl 表达式处理器(Tcl_ExprLong, Tcl_ExprBoolean 等)来处理它们。其中的运算符

与 C 语言的很相似。

　　逻辑非

* / % + -

<< >>

　　左移右移只能用于整数。

< > <= >= == !=

　　逻辑比较

& ^ |

　　位运算和异或或

&&' '

　　逻辑"和" "或"

x ? y : z

　　If-then-else 与 C 的一样

　　Tcl 中的逻辑真为 1，逻辑假为 0。

　　一些例子：

5 / 4.0

5 / ( [string length "abcd"] + 0.0 )

　　计算字符串的长度转化为浮点数来计算

"0x03" > "2"

"0y" < "0x12"

　　都返回 1

set a 1

expr $a+2

expr 1+2

　　都返回 3

列表

　　字符串的另一种解释为列表。一个列表是类似于结果的一个字符串包含了用空白分开

的很多域。例如 "Al Sue Anne John" 是一个有四个元素的例表，在列表中换行父被视为分

隔符。例如：

　　b c {d e {f g h}} 是一个有三个元素的列表 b 、c 和 {d e {f g h}}。

　　Tcl 的命令 concat, foreach, lappend, lindex, linsert,list, llength, lrange,lreplace, lsearch, 和

lsort 可以使你对列表操作。

正则表达式

　　Tcl 提供了两个用于正则表达式的命令 regexp 和 regsub。这里的正则表导师实际上

是扩展的正则表达式，与 egrep 相一致。

　　支持 ^ $ . + ? > < () | []

命令结果

　　每一条命令有俩个结果：一个退出值和一个字符串。退出值标志着命令是否正确执行，

字符串给出附加信息。有效的返回制定议在`tcl.h"，如下：

TCL_OK

　　命令正确执行，字符串给出了命令的返回值。

TCL_ERROR

　　表示有一个错误发生，字符串给出了错误的描述。全局变量 errorInfo 包含了人类可读

的错误描述，全局变量 errorCode 机器使用的错误信息。

TCL_RETURN

　　表示 return 命令被调用，当前的命令（通常是一个函数）必须立刻返回，字符串包含

了返回值。

TCL_BREAK

　　表示 break 已经被调用，最近的巡环必须立刻返回并跳出。字符串应该是空的。

TCL_CONTINUE

　　表示 continue 已经被调用，最近的巡环必须立刻返回不跳出。字符串应该是空的。

　　Tcl 编程者一般需要关心退出值。当 Tcl 解释器发现错误发生后会立刻停止执行。

Procedures 函数

　　Tcl 允许你通过 proc 命令来扩充命令（定义新的命令），定义之后可以向其它的内建

命令一样使用。

　　例如：

proc pf {str} {

puts $str

}

pf "hello world"

这里有一个初学者不注意的地方，上述的定义一定要写成那样子。而不能向下面那样写：

proc pf {str}

{

puts $str

}

　　因为 proc 实际上也只不过是一条命令，是一换行符或分号来结束的，用集群参数来传

递函数体。proc 的定义如下：

proc name args tclcommand

Variables: scalars and arrays

　　变量：标量和向量（即数组）

　　向量就是数组，而标量是没有下表的变量。

　　我们用 C 来类比：

int i； // i 是标量

int j[10]； // j 是向量

　　变量不需要定义，使用的时候会自动的被创建。Tcl 支持两种

　　变量：标量和向量

　　举个例子来说明吧，

set i 100

set j(0) 10

set k(1,3) 20

　　i 是标量，j 是向量。

　　引用的时候：

$j(0)

$k(1,3)

　　Tcl 内置命令

内置的命令

　　Tcl 提供了下面描述的内置函数。

　　.其中： ... 表示参数不定具体有：

　　append 命令：

append varName value

append varName value value value ...

　　将那一大堆 value 附加到 varName 后面。如果变量不存在，会新建一个。

　　例子：

set i "aaa"

append i "bbb" "ccc"

//i = aaabbbccc

　　array 命令：

array subcommand arrayName

array subcommand arrayName arg ...

　　这是一组用于向量操作的命令。第二个参数是子命令名。

　　假设：

set a(1) 1111

set a(2) 2222

set a(three) 3333

　　一下均以它为例子(tclsh 在中运行)。

array names arrayName

　　返回一个数组元素名字的列表。

评论收藏

内容反馈

版权申诉

周楷雯

粉丝: 94
资源: 1万+

TCL.rar_tcl

tcl.rar_.tcl_tcl

TCL.rar_tcl 使用

TCL-.rar_tcl 教程

tcl.rar_tcl/tk_

tcl.rar_tcl_tcl tk_tcl 文件

tcl.rar_tcl

tcl.rar_ns .t_tcl

WPAN_ZBR_pub.rar_802.15_NS2 802.15.4_WPAN_Zigbee.tcl_ns2 zigbee_

Tcl.rar_tcl

TCL语言编程文档

Tcl reference

tcl.rar_.tcl_tcl_tcl tk_tcl/tk_tcl_tk

TCL学习文档

tcl.rar_TCL 网络_tcl_tcl script

tcl.rar_dsr tcl_dsr路由_tcl_tcl ad hoc_无线自组网

tcl_tk.rar_tcl/tk_tcl_tk

TCL.rar_tcl_tcl tk_tcl语言

Tcl.rar_download smac.tcl_smac tcl script_tcl脚本_tcl脚本欣赏_脚本 tcl

sctp.rar_NS2 for mobile_SCTP tcl_SCTP.rar_linux SC_流控

TCL.rar_tcL学习_tcl_tcl/tk_tk

tcl控制台测试文件

tcl动画脚本.rar_tcl/tk_

TCL编程说明文档

TCL语言包

smac.rar_smac_smac tcl_smac.tcl_tcl_无线传感网

tcl.rar_tcl_tcl 教程

TCL_TK.rar_Tcl and tk_tcl_tcl/tk_tcl_tk_vmd tcl tk 文件

tcl.rar_reference script

rp.rar_AODV/DSR routing_DSDV AODV_dsdv-test.tcl_manet_rp.rar

最新资源