TCL 测试语言入门

Tcl语言基础（TCL语言Tcl tick 的构成在下面的清单中，将会发现第一个很常见的示例程序，它是用Tcl 实现的。

这是一个完整的脚本：第一行命令调用 tclsh 环境，第二行命令执行实际工作。

用您所选择的文本编辑器创建该脚本，输入chmod +x hello.tcl 使之成为可执行文件，然后执行它以测试您这件“作品”。

~/tcltk$ cat hello.tcl#!/usr/bin/tclshputs stdout {Hello, World!}~/tcltk$ ./hello.tclHello, World!Tcl 和 Tk 是解释型的、可扩展脚本语言。

与 BSD 许可证十分相似，该许可证允许在任何情况下自由使用该软件，只要在所有副本中保留该版权并且在任何分发中一字不差地传递通告。

这个许可证条款使Tcl/Tk 成为自由软件。

Tcl/Tk 是一种解释型环境。

可以通过添加预编译的C 函数来扩展Tcl 解释器，可从 Tcl 环境内部调用 Tcl 解释器。

可以为特定目的或一般的以及广泛使用的而定制这些扩展。

我们将在教程的后面看一些扩展并着重看一下第一个扩展—非常流行的 Expect。

在接下来的几屏中，将回顾 T cl 语言的一些主要特性，从元字符和全局变量到运算符、数学函数以及核心命令。

毕竟，这些命令使Tcl/Tk 成为有特色的，逐步发展的语言。

请记住，在本教程中没有篇幅涉及每条命令。

这里只突出一部分，以后您可以更进一步了解Tcl/Tk。

#!/usr/bin/tclsh# filename hello2.tcl# This program code shows# metacharacter usageputs stdout "Hello, World! \a"puts stdout {Hello, World! \a}set Pints 6set Days 7puts stdout "The answer to the universe is [ $Pints * $Days]!\n"***~/tcltk$ ./hello2.tclHello, World!Hello, World! \aThe answer to everything is 42!Tcl 元字符元字符是在Tcl/Tk 环境的上下文中有特殊含意的字符或字符对，它们包括分组语句、封装字符串、终止语句以及其它，如下表所示。

實驗二TCL語言簡介實驗目的學習TCL語言的基本語法。

背景知識TCL (Tool Command Language)在NS2中主要是用來描述腳本，簡單的說就是用來描述要模擬的網路環境和參數設定等。

實驗步驟[安裝文書編輯軟體PSPad [1]]在開始學習撰寫腳本之前，選擇一個好用的文字編輯器是非常重要。

在此推薦一個免費的文字編輯器(PsPad，/en/download.php)給大家，好讓未來撰寫腳本時有個好工具可用。

1.請切換目錄到ns-allinone-2.29/ns-2.29/book/lab2的目錄下，執行PSPad的安裝檔pspad432inst_en.exe。

2.請按”Next”，則如下圖所示。

3.請選擇”I accept the agreement”。

4.請按”Next”，則如下圖所示。

此圖為PSPad的安裝路徑，可以選擇喜歡安裝的位置，不過我們在這裡使用內定的路徑即可。

5.請按”Next”，則如下圖所示。

6.請按”Next”，則如下圖所示。

7.請按”Install”，開始進行安裝。

8.安裝完成後，則如下圖所示。

9.請按”Finish”，完成安裝，並且開始執行PSPad editor。

[TCL語法練習]這部份的資料主要是參考[2]，因此有興趣的讀者可以到此網站找尋更詳細的資料。

1. 變數(variable)和變數替換(variable substituion)正如其他的程式語言一樣，變數(variables)可以被想成是用來儲存各種類型資料的盒子(boxes)。

這些盒子(或者說是變數)，都有各自的名稱，而這些名稱在我們需要取用或者是變更變數的值(value)時將會被用到。

在C語言在使用變數時，需要事先的宣告，而TCL則不需要事先宣告，TCL 變數是在第一次使用set的指令來指派變數的值時所產生的。

當我們不再需要某個變數時，可以使用unset來取消這個變數。

但一般而言，可以不用去做這個動作。

TCL脚本语言语法基础讲解1.Tcl基础知识1.1什么是tclTcl全称是Tool command Language。

它是一个基于字符串的命令语言，基础结构和语法非常简单，易于学习和掌握。

Tcl语言是一个解释性语言，所谓解释性是指不象其他高级语言需要通过编译和联结，它象其他shell语言一样，直接对每条语句顺次解释执行。

Tcl数据类型简单。

对Tcl来说，它要处理的数据只有一种——字符串。

Tcl将变量值以字符串的形式进行存储，不关心它的实际使用类型。

1.2Tcl命令格式一条Tcl基本语法为：command arg1arg2 .... (命令参数1 参数2...)其中command为Tcl内建命令或者Tcl过程。

各条命令可以单独一行，也可以在同一行，在同一行时，需要用“；”来分隔。

即：command1 arg1 ... ; command2 arg2如以下的输出命令会在输出终端输出一段字符串：例 1-1 输出一段字符串的例子%puts "The next line contains an error"=> The next line contains an error注意：字符串中如果有空格的话，一定要用””或者{}括起来。

因为Tcl语句中各命令参数是以空格来分隔的，如果不用""或{}括起来，字符串中的单词会被误认为多余的参数而出错。

1.3脚本、命令和单词符号一个TCL脚本可以包含一个或多个命令。

命令之间必须用换行符或分号隔开set a 1；set b 2TCL的每一个命令包含一个或几个单词，第一个单词代表命令名，另外的单词则是这个命令的参数，单词之间必须用空格或TAB键隔开。

1.4Tcl脚本文件和source 命令除了通过交互式执行Tcl命令外，还可以将Tcl命令保存到一个后缀为.tcl的文件内，然后用Tcl的命令source 来执行：source fileNamesource命令从文件中读取Tcl命令并计算1.5置换(substitution)(注：在下面的所有章节的例子中，'％'为TCL的命令提示符，输入命令回车后，TCL会在接着的一行输出命令执行结果。

TCL学习记录最近学习了tcl，有一些体会，写出来供大家一起交流和切磋！p.s.：由于鄙人只是用tcl进行常规流程控制和仿真验证平台的搭建，因此涉及到较为高级的用法以及tk界面的东东就没有涉猎，如果有哪位仁兄对高级用法很有心得，可以与我联系哦。

Note：鄙人此处挑拣了tcl中较为基本，也是十分实用的几个方面做粗略描述，后面还提出了一个较小的工程设计。

虽然不是很完整，但个人认为麻雀虽小，五脏也是聚全了^_^。

细节性的东西还劳烦大家参考active state的tcl manual。

一．Tcl是一种基于字符串的、解释性命令的语言，语法规则简单、易学。

Variable substitution: $, nestableCommand substitution: [], 其实，有了command substitution实际上就表示命令可以嵌套，即：一个命令的结果可以作为别的命令的参数。

Backslash substitution: \, 与c语言类似，反斜杠主要用于在字符中插入诸如换行符、空格、[、$等被tcl解释器当作特殊符号对待的字符。

双引号和花括号除反斜杠歪，tcl提供另外两种方法来使得解释器把分隔符和置换符等特殊字符当作普通字符。

Tcl 解释器对双引号中的各种分隔符将不做处理，但是对换行符以及$、[]两种置换符还会做特殊处理。

而在花括号中，所有特殊字符都将成为普通字符，失去其特殊意义。

二、数组数组是一些元素的集合。

Tcl的数组和普通的计算机语言中的数组有很大的区别。

在tcl中，不能单独申明一个数组，数组只能和数组元素一起申明。

（感觉更像是c语言中的结构体）tcl不支持复杂的数据类型，这一点是tcl受指责最多的方面。

e.g.:set day(Monday) 1set day(Tuesday) 2数组的置换和简单的变量置换类似：e.g.:set a Mondayset day(Monday) 1set b $day(Monday) //b的值为1，即day(Monday)set c $day($a) //c的值为1，即day(Monday)三、listList这个概念在tcl中是用来表示集合的。

TCL语言基础变量置换：它是由一个$符号标记，变量置换会导致变量的值插入一个单词符号中。

set x 10例如：set y $x+100 //y的值是10 + 100如果主要想得到值110，还必须用命令置换。

命令置换：命令置换是由[]括起来的TCL命令及其参数，命令置换会导致一个命令的所有或部分单词符号被另一个命令的结果所代替例如：set y [expr $x + 100] //y的值是110set y [expr $x + 100 ; set b 300 ] //y的值为300，因为了的值为300反斜杠置换：类似于C中反斜杠的用法，主要用于在单词符号中插入诸如换行符、空格、[、$等被TCL解析器当作特殊符号对待的字符。

例如：set msg multiple\space //这里最后两个单词间的空格不是分隔符，msg的值为：multiple spaceset msg money \ \$3333\ \nArray\ a\[2] //这个命令的执行结果为：money $3333 Array a[2] 将一个变量赋值给一个变量时，需用$符号如：set EndUser000 …8613000000000‟set EndUser $ EndUser000相关命令unser这个命从解析器中删除变理，后面可以有任意个参数，每个参数是一个变量名，删除数组的例子：%put $day(Monday)%put $day(Tuesday) 2%unset day%put $day(Tuesday)append命令把文本加到一个变量的后面例如：%set txt hellohello%append txt …! How are you‟hello ! How are you.Incr命令把一个变量值加上一个整数。

Incr要求变量原来的值和新加的值都必须是整数%set b a a%incr b expected integer but got “a”%set b 2 2%incr b 3 5List命令集List命令语法：list? Value value…?这个命令生成一个list，list的元素就是所有的value.例：%list 1 2 {3 4} 12{34}Concat命令语法：concat list ? list…?这个命令把多个list合成一个list，每个list变成新list的一个元素Lindex命令语法：lindex list index返回list的第index个（0-based）元素。

今天，在无意间看到了“TCL语言”，以前没有听过，也没有看过，上网搜了一下，对它简单的了解学习了一下。

需要详细了解请打开下面网址了解，学习。

/TCL(Tool Command Language)是一种解释执行的脚本语言(scrīpting Language)。

它提供了通用的编程能力：支持变量、过程和控制结构；同时TCL还拥有一个功能强大的固有的核心命令集。

由于TCL的解释器是用一个C\\C++语言的过程库实现的，因此在某种意义上我们又可以把TCL看作一个C库，这个库中有丰富的用于扩展TCL命令的C\\C++过程和函数，可以很容易就在C\\C++应用程序中嵌入TCL，而且每个应用程序都可以根据自己的需要对TCL语言进行扩展。

我们可以针对某一特定应用领域对TCL语言的核心命令集进行扩展，加入适合于自己的应用领域的扩展命令，如果需要，甚至可以加入新的控制结构，TCL解释器将把扩展命令和扩展控制结构与固有命令和固有控制结构同等看待。

扩展后的TCL 语言将可以继承TCL 核心部分的所有功能，包括核心命令、控制结构、数据类型、对过程的支持等。

根据需要，我们甚至可以屏蔽掉TCL的某些固有命令和固有控制结构。

通过对TCL的扩展、继承或屏蔽，用户用不着象平时定义一种计算机语言那样对词法、语法、语义、语用等各方面加以定义，就可以方便的为自己的应用领域提供一种功能完备的脚本语言。

TCL良好的可扩展性使得它能很好地适应产品测试的需要，测试任务常常会由于设计和需求的改变而迅速改变，往往让测试人员疲于应付。

利用TCL的可扩展性，测试人员就可以迅速继承多种新技术，并针对产品新特点迅速推出扩展TCL命令集，以用于产品的测试中，可以较容易跟上设计需求的变化。

另外，因为TCL是一种比C\\C++ 语言有着更高抽象层次的语言，使用TCL可以在一种更高的层次上编写程序，它屏蔽掉了编写C\\C++程序时必须涉及到的一些较为烦琐的细节，可以大大地提高开发测试例的速度。

Tcl/Tk 漫谈〖摘要〗Tcl/Tk 是一种简明，高效，可移植性好的编程语言。

在信息产业领域具有广泛的应用。

本文介绍其成长历史，特点，优势及应用范围。

〖关键词〗Tcl/Tk, 组件，可移植性Tcl/Tk 的发明人 John Ousterhout 教授在八十年代初，是伯克利大学的教授。

在其教学过程中，他发现在集成电路 CAD 设计中，很多时间是花在编程建立测试环境上。

并且，环境一旦发生了变化，就要重新修改代码以适应。

这种费力而又低效的方法，迫使 Ousterhout 教授力图寻找一种新的编程语言，它即要有好的代码可重用性，又要简单易学，这样就促成了 Tcl (Tool Command Language) 语言的产生。

Tcl 最初的构想的是希望把编程按照基于组件的方法 (component approach)，即与其为单个的应用程序编写成百上千行的程序代码，不如寻找一个种方法将程序分割成一个个小的, 具备一定“完整”功能的，可重复使用的组件。

这些小的组件小到可以基本满足一些独立的应用程序的需求，其它部分可由这些小的组件功能基础上生成。

不同的组件有不同的功能，用于不同的目的。

并可为其它的应用程序所利用。

当然, 这种语言还要有良好的扩展性, 以便用户为其增添新的功能模块。

最后，需要用一种强的，灵活的“胶水”把这些组件“粘”合在一起, 使各个组件之间可互相“通信”，协同工作。

程序设计有如拼图游戏一样，这种设计思想与后来的 Java 不谋而合。

终于在 1988 年的春天, 这种强大灵活的胶水 - Tcl 语言被发明出来了。

按照 Ousterhout 教授的定义， Tcl 是一种可嵌入的命令脚本化语言 (Command Script Language)。

“可嵌入”是指把很多应用有效，无缝地集成在一起。

“命令”是指每一条 Tcl 语句都可以理解成命令加参数的形式：命令 [参数 1] [参数 2] [参数 3] [参数 4] ...... [参数 N]脚本化是指 Tcl 为特殊的，特定的任务所设计。

五分钟学TclConcept 1: 程序是由命令(command)组成的Tcl语言最基本的概念是：命令。

程序是由一条接一条的命令构成的。

举例来说，设置变量’a’为5，并且打印它的值，你写两条命令：set a 5puts $a命令是以空格分隔的单词组成的。

一条命令以换行符或分号(‘;’)结尾。

在Tcl 中，万事皆命令 – 正如你看到的那样，Tcl中并没有赋值符。

要给一个变量赋值，需要用set命令，它将第一个参数所指定的变量，赋值为第二个参数所指定的值。

几乎所有的Tcl命令都会返回一个值，比如set命令返回的值就是其所赋的值。

如果set命令仅指定一个参数（变量名），那么其返回值就是该变量的当前值Concept 2: 命令替换(Command subsitution)其次的概念是：命令替换。

在一个命令中，某些参数可能出现在[ ]中。

这种情况下，参数被替换成[ ]中代码的返回值。

例如：set a 5puts [set a]第二条命令的第一个参数，[set a]，会被替换成“set a”的返回值（即 5）。

在替换之后，这条命令就从puts [set a]转换成puts 5然后，它被正常执行。

Concept 3: 变量替换(Variable subsitution)如上例，总是用set命令来引用变量值显得太冗长了些，因此Tcl早期版本就已经引入了新的变量替换的概念。

如果一个变量名前面加上 $ 字符，那么它被替换成该变量的值。

所以，就没有必要用puts [set a]而可以使用puts $aConcept 4: 组(Grouping)如果命令由空格分隔的单词构成，那么如何处理包含空格的参数呢？比如：puts Hello World是一条不正确的语句，因为Hello和World是两个独立参数。

解决方式是分组(grouping)。

包含在""中的文本被认为是单个参数，所以正确的语句是：puts "Hello World"命令替换和变量替换在这种分组中也是有效的，比如我可以写：set a 5set b foobarputs "Hello $a World [string length $b]"结果是"Hello 5 World 6". 另外，转义字符如\t, \n 仍然有效.还有另一种Grouping方式，这种方式下所有的特殊字符都只有其字面含义，而不会发生变量替换。

本文由ｓｕｎｎｙ＿ｔｅｓｔ贡献 ｄｏｃ１。

ＴＣＬ　语言基础资料 一　脚本语言详细介绍 ２１　世纪的高级编程语言　摘要：　摘要　Ｐｅｒｌ　和　Ｔｃｌ　等脚本语言代表一种与　ｃ　或　ＪａｖａＴＭ　为代表的系统程序设计语言完全不同的　编程形式．　脚本语言为＂胶着＂应用程序而设计，　它使用无类型方法来实现高级编程和比系统　程序设计语言更快的发展应用．　计算机速度的增长和混合应用的改变使脚本语言在今后的应　用中越来越重要．　关键字：　关键字　组件框架，面向对象编程，脚本，强类型，系统编程　１．简介　１．简介　在过去的十五年里，人们编写计算机程序的方法发生了根本的转变．这种转变是从　ｃ　或　ｃ＋＋等系统程序设计语言到　Ｐｅｒｌ　或　Ｔｃｌ　等脚本语言的过渡．虽然很多人参与了转变，却　很少有人意识到它的发生，　更不用说知道为什么会发生．　这篇文章是我关于为什么在下个世　纪脚本语言可以比系统程序设计语言更好的处理许多编程工作的一点看法．　与系统程序设计语言相比，不同的脚本语言为不同的工作而设计，　这导致了语言间的根本　不同．系统程序设计语言起源于像内存字等最初期的计算机元素，它为建立数据结构和算法　而创建．相反的，脚本语言为胶着而设计：他们假设已经存在一套强大的组件，而它主要是　把组件连在一起．　系统程序设计语言使用强类型定义来帮助处理复杂事务，　而脚本语言使用　无类型定义来简化组件间的联系，并提供快速应用开发．　脚本语言和系统程序设计语言互为补充，　并且二十世纪六十年代以来的大多数主要的计　算机平台都同时提供这两种类型的语言．　这些语言在组件框架中有着典型的应用：　组件由系　统程序设计语言创建，　并由脚本语言组合在一起．　然而，　速度更快的机器，　更好的脚本语言，　图形用户界面和组件构造重要性的不断提高，　因特网的发展等发展趋势大大提高了脚本语言　的应用．在今后的十年中，这种趋势将继续，而且越来越多的完全使用脚本语言和系统程序　设计语言书写的应用程序将主要用来创建组件．　２．系统程序设计语言　２．系统程序设计语言　为了理解脚本语言和系统程序设计语言的不同，最好先了解一下系统程序设计语言是如　何发展的．系统程序设计语言是作为除汇编语言外的另一种选择而引入的．在汇编语言里，实　际上机器的每一个细节都被反映在程序里．每个状态代表一个简单的机器指令，而程序员必　须处理像寄存器分配和程序调用顺序等低层细节．因此，用汇编语言编写和维持大型程序是　很困难的．　二十世纪五十年代后期像　Ｌｉｓｐ，Ｆｏｒｔｒａｎ　和　Ａｌｇｏｌ　等高层语言开始出现．这些语言里的状　态和机器指令不再完全一致，编译程序把过程程序中的每个状态翻译成一系列二进制指令．　经过一段时间，一系列系统程序设计语言包括　ＰＬ／１，Ｐａｓｃａｌ，Ｃ，Ｃ＋＋和　Ｊａｖａ　由　Ａｌｇｏｌ　发展而来． 系统程序设计语言没有汇编语言的效率高，但他们使应用程序更快的发展起来，因此，系统程　序设计语言在大型应用项目的发展中几乎完全取代了汇编语言．　系统程序设计语言与汇编语言在两个方面有所不同：它是高层语言并且是强类型．＂高层　＂意味着很多细节被自动处理以便编程人员可以写更少的代码而做同样的工作．例如：　★编译程序处理寄存器分配，所以编程人员不需要写代码来在寄存器和内存间转移数据　★自动设计程序调用顺序：编程人员不需要担心调用栈之间的参数转移　★编程人员可以使用像　ｗｈｉｌｅ　和　ｉｆ　等简单的关键字来控制结构，编译器执行所有的指令细节　来完成控制结构　平均每行系统程序设计语言代码翻译成大约五条机器指令，与此相比，每行汇编语言代　码翻译成一条机器指令（由　５　个不同的人写的　８　个　ｃ　文件的非正式分析中，我发现这个比率为　每行　３　到　７　条指令；Ｃａｐｅｒｓ　Ｊｏｎｅｓ　从大量语言的研究中发现对于一个给定的工作，汇编语言　需要的代码长度大约是系统程序设计语言代码长度的　３－６　倍）不管是什么语言，编程人员每　年可以写大体上相同数量的代码行，因此，系统程序设计语言允许用比汇编语言快得多的语　言写应用程序．　汇编语言和系统程序设计语言的第二个不同是类型设置．我使用＂类型＂来说明信息的意　义在它被使用前就被特殊化．在强类型语言中编程人员声明如何使用每条信息，并避免此信　息被用于其他方式．在弱类型语言中信息应用是没有优先权限制：信息的意思完全由它的使　用方法确定，而不是任何初始约定．　现代计算机基本上是无类型的：内存中的任何字对任何类型的值比如整型，浮点数，指针　或结构体都是有效的．值的意思由它的使用方法确定：如果指向一个内存字，那么他就被认为　是结构体；如果一个字涉及一个整型加结构体，那么他就被认为是整型，如此等等．相同的字　在不同的时间可用于不同的方法．　与此相反，现在的系统程序设计语言是强类型定义的．例如：　★系统程序设计语言中的每个变量都必须被声明为整型或指针或字符串等特殊类型，并且必　须用于适合这种类型变量的方法　★数据与代码完全分离：创建新的代码很困难或根本不可能．　★变量可以集中在结构体中或者定义好的子结构体和过程或方法的对象中以便于使用；一种　类型的对象不能用于期待其他类型对象处．　确定类型由几个好处．第一，声明变量如何使用使大型程序更易于管理并区分那些必须　被分别对待的变量．第二，编译器可以利用类型信息来侦测某些类型的错误，比如，试图把一　个浮点值作为一个指针．第三，定义类型能使编译器更好的执行特殊代码．例如，如果编译器　知道一个变量总是对整型值有效，那么他就可以产生一个整型指令来操纵这个变量；如果编　译器不知道变量的类型，那么他就必须产生额外的指令在运行时检查变量类型．　总之，系统程序设计语言被设计来处理与汇编语言相同的工作，即随机地产生请求．系统　程序设计语言比汇编语言层次更高，类型更强．这就使请求产生更迅速并且处理更容易，除了　在运行时有一点损失，图示　１　是汇编语言和其他几种系统程序设计语言的比较． ３．脚本语言　３．脚本语言　脚本语言，像　Ｐｅｒｌ，Ｐｙｔｈｏｎ，Ｒｅｘｘ，Ｔｃｌ，Ｖｉｓｕａｌ　Ｂａｓｉｃ　和　Ｕｎｉｘ　ｓｈｅｌｌｓ　代表了与系统程序　设计语言完全不同的编程．脚本语言假设已经存在了一系列由其他语言写成的有用的组件．　脚本语言不希望随机地产生请求，他希望主要是把组件接在一起．例如，Ｔｃｌ　和　Ｖｉｓｕａｌ　Ｂａｓｉｃ　可以被用于在屏幕上安排一系列用户图形控制，而　Ｕｎｉｘ　ｓｈｅｌｌｓ　ｓｃｒｉｐｔｓ　被用于把过滤程序　集合入管道．脚本语言常用于扩展组件特性，但他们很少用于复杂的算法和数据结构；这些东　西常由组件提供．脚本语言有时涉及胶着语言或系统整体语言．　为了简化连接组件的工作，脚本语言被设计为无类型的：所有的东西无论是看起来还是　使用起来都是完全一样的，因此他们可以互换．例如，在　Ｔｃｌ　或　Ｖｉｓｕａｌ　Ｂａｓｉｃ　中一个变量可以　一会儿处理字符串，一会儿又处理整型．代码和数据也常可互换，因此，可以用一个程序写另　一个程序，然后高速执行，脚本语言一般是面向字符的，因为它为许多不同的事物提供了一致　的描述．　无类型语言使组件更容易连在一起．在使用时没有优先级限制，并且所有的组件及其值　都用统一的方式描述．除此之外，任何组件和值都可以在任何情况下使用；为某一目的而设计　的组件可以被用于设计者完全没有预见过的完全不同的目的．例如，在　Ｕｎｉｘ　ｓｈｅｌｌｓ　中，所有　的过滤程序从输入读入字节流，并把字节组成的字符串写入输出；任何两个程序都可以通过　把一个的输出连到另一个的输入而把两者联系起来．　下面的　ｓｈｅｌｌ　命令把三个过滤堆在一起来计算选中区域中包含单词＂ｓｃｒｉｐｔｉｎｇ＂　的行　数：　ｓｅｌｅｃｔ　｜　ｇｒｅｐ　ｓｃｒｉｐｔｉｎｇ　｜　ｗｃ ｓｅｌｅｃｔ　程序读入当前显示选中的文本并把它输出；ｇｒｅｐ　程序读取输入并把包含　＂ｓｃｒｉｐｔｉｎｇ＂的行输出；ｗｃ　程序对输入的行数求和．其中的每个　程序都可以用于许多其他情　况来做不同的工作．　系统程序设计语言的强类型本质上阻止重用．类型鼓励编程人员创建包含不相容接口　的类型（＂接口很好，接口越多越好＂）．每个接口需要特别类型的对象，而编译器不允许接口使　用任何其他类型的对象，即使那样有用．为了使用一个已经存在的接口的新的对象，就必须写　转换代码以便在对象的类型和接口期望的类型间进行翻译．这反过来又需要重编译部分或全　部分布式二进制形式的应用程序，在普通情况下这是不可能的．　为了能看出无类型语言的优点，考虑下面的　Ｔｃｌ　命令：　ｂｕｔｔｏｎ　．ｂ　－ｔｅｘｔ　Ｈｅｌｌｏ！　－ｆｏｎｔ　｛Ｔｉｍｅｓ　１６｝　－ｃｏｍｍａｎｄ　｛ｐｕｔｓ　ｈｅｌｌｏ｝　这个命令创建了一个新的按钮来显示　１６　点　Ｔｉｍｅｓ　字体，当用户敲击控制键时显示一段　小的信息．它把六种不同的类型混合成一个单一的状态：一个命令名（ｂｕｔｔｏｎ），一个按钮控制　（．ｂ），所有权名字（－ｔｅｘｔ，　－ｆｏｎｔ，　和－ｃｏｍｍａｎｄ），简单字符串（Ｈｅｌｌｏ！　和　ｈｅｌｌｏ），包含铅字名　（Ｔｉｍｅｓ）及字点大小（１６）的字体名（Ｔｉｍｅｓ　１６）和　Ｔｃｌ　脚本（ｐｕｔｓ　ｈｅｌｌｏ）．Ｔｃｌ　代表所有这些非　正式字符串．在这个例子中可以在任何一个命令中为属性赋值，而未赋值的属性使用给定的　缺省值．在这个例子中　２０　个以上的属性是不特别赋值的．　同样的例子在　Ｊａｖａ　中用两种方法执行时需要　７　行代码．使用　Ｃ＋＋和微软基本类（ＭＦＣ）　需要三个过程　２５　行代码，在微软基本类中仅仅设置字体就需要几行代码：　ＣＦｏｎｔ　＊ｆｏｎｔＰｔｒ　＝　ｎｅｗ　ＣＦｏｎｔ（）；　ｆｏｎｔＰｔｒ－＞ＣｒｅａｔｅＦｏｎｔ（１６，　０，　０，０，７００，　０，　０，　０，　ＡＮＳＩ＿ＣＨＡＲＳＥＴ，　ＯＵＴ＿ＤＥＦＡＵＬＴ＿ＰＲＥＣＩＳ，ＣＬＩＰ＿ＤＥＦＡＵＬＴ＿ＰＲＥＣＩＳ，　ＤＥＦＡＵＬＴ＿ＱＵＡＬＩＴＹ，　ＤＥＦＡＵＬＴ＿ＰＩＴＣＨ｜ＦＦ＿ＤＯＮＴＣＡＲＥ，　＂Ｔｉｍｅｓ　Ｎｅｗ　Ｒｏｍａｎ＂）；　ｂｕｔｔｏｎＰｔｒ－＞ＳｅｔＦｏｎｔ（ｆｏｎｔＰｔｒ）；　大部分代码是由强类型造成的．为了设置按钮字体，必须运用　ＳｅｔＦｏｎｔ　方法，但这个方法　必须通过指针传给　ＣＦｏｎｔ　对象，这反过来需要声明和初始化一个新的对象．为了初始化　ＣＦｏｎｔ　对象必须唤醒它的　ＣｒｅａｔｅＦｏｎｔ　方法，但　ＣｒｅａｔｅＦｏｎｔ　有一个需要　１４　个特殊化引数的固定接　口．在　Ｔｃｌ　中字体（Ｔｉｍｅｓ　铅字，１６　点）的基本特征不用声明或转换就可以立即使用．另外，Ｔｃｌ　允许在创建按钮的命令中直接包含按钮行为，而　Ｃ＋＋和　Ｊａｖａ　中需要把它放在单独声明的方法　中．　（实际上可以用隐藏基本语言的复杂性的图形开发环境处理一个像这样的不重要的例子：　用户在表中输入合适的值，而开发环境输出代码．然而，在更多复杂情况像按计划产生合适值　或接口的条件任务中开发人员必须在基本语言下编写代码）　这可能看起来脚本语言的无类型特性不能发现错误，但实际上脚本语言和系统程序设计语言　一样安全．例如在上面的按钮例子中如果字体大小被置成非整型字符串，就像　ｘｙｚ，那么就会　出现错误．不同的是当一个值被使用时脚本语言在最后一刻进行错误检查，而强类型在编译　时发现错误这就避免了运行时的检查．然而提高效率的代价是限制信息如何使用：这导致了　更多的代码和更不易改变的程序． 脚本语言和系统程序设计语言的另一个重要不同是脚本语言是被解释而系统程序设计　语言是被编译．被解释的语言由于没有编译时间而提供快速的转换．通过允许用户运行时编　写应用程序，解释器使．应用程序更加灵活，例如，许多整体线路的综合分析工具，包括　Ｔｃｌ　解　释器；程序用户编写　Ｔｃｌ　脚本来使他们的设计具体化并控制工具操作．通过快速设计代码解　释器可以实现强大的功能．例如，一个基于　Ｔｃｌ　的网页浏览器可以通过把网页中的　ＨＴＭＬ　转换　为使用一些常规表达替代物的　Ｔｃｌ　脚本，从而从语法上分析网页然后执行脚本把页面翻译显　示在屏幕上．　脚本语言不如系统程序设计语言效率高，部分是因为他们使用解释器而不是编译器，而且　因为他们基本组件的选择标准是功能强大和易于使用而不是有效地对应基本硬件．例如，脚　本语言经常使用长度可变的字符串，而同样的情况下系统程序设计语言使用对应一个机器字　的二进制值；脚本语言经常使用哈希表，而系统程序设计语言使用变址阵列．　幸运的是，脚本语言的性能不经常是一个主要的问题．脚本语言应用程序通常比系统程　序设计语言的应用程序要小，并且脚本应用程序的执行受组件执行的支配，而这些组件是系　统程序设计语言提供的典型工具．　脚本语言比系统程序设计语言更高级，平均一个指令可以做更多的工作．一个典型的脚　本语言指令执行成百上千条机器指令，而一个典型的系统程序设计语言指令执行大约五条机　器指令（参图一）．部分不同是因为脚本语言使用翻译器，这不如系统程序设计语言中被编译　的代码．但是主要的不同是因为脚本语言的初期操作有更强大的功能．例如，Ｐｅｒｌ　中唤醒一　个常规表达替代和唤醒一个整型加法一样简单．在　Ｔｃｌ　中，变量会有与它相联系的图标，因此，　设置变量会导致侧面影响．例如，一个图标可能会被用于保持变量的值在屏幕上持续更新． 表　１．表的每行描述了被执行了两遍的应用程序，一遍使用系统程序设计语言，像　Ｃ　或　Ｊａｖａ，　一遍使用脚本语言，像　Ｔｃｌ．代码率列给出了两个应用程序的代码行率（＞１　意味着系统编程语　言需要更多的代码），作用率列给出了开发率．在大多数情况下两个版本由不同的开发者执行．　表中的信息由　ｃｏｍｐ．ｌａｎｇ．ｔｃｌ　新闻组中对文章进行答复的不同人提供．．　由于上面描述的特性，脚本语言允许基于胶着的应用程序的快速发展．表　１　提供了有趣　的支持．它描述了几个在系统程序设计语言下执行后又在脚本语言中重新执行的应用程序，　或反过来也是一样的．　在每种情况下脚本版本都比系统编程版本需要更少的代码和更短的开发时间，不同点的　变化从　２　到　６０．脚本语言第一次执行时好处不显著，这使人联想到任何在第一次执行经验上　的重执行都会更好，而脚本和系统编程的真正不同相差　５　到　１０　倍，而不是表中的极端点．脚本　的好处同样依赖于应用程序．在表中的最后一个例子中，应用程序的图形用户界面部分是基 于胶着的，而模拟装置部分却不是；这可能解释为什么脚本应用程序不如其他应用程序获益　多．　总之，脚本语言被设计成胶着应用程序，他们提供比汇编或系统程序设计语言更高层的　编程，比系统程序设计语言更弱的类型，和解译后的开发环境．脚本语言牺牲执行速度来提高　开发速度．　４．不同的任务，　４．不同的任务，不同的工具　不同的任务　脚本语言不是系统程序设计语言的替代品，反过来也一样．他们各自适合不同类型的工　作．把胶着和系统合为一体，应用程序可以比脚本语言快　５－１０　倍；系统程序设计语言将需要　大量复本和转换代码来连接各块．而这直接使用脚本语言．对于复杂的算法和数据结构，系统　程序设计语言的强类型使程序更易于管理．执行速度是关键．系统程序设计语言可以比脚本　语言运行快　１０－２０　倍，因为它产生更少的运行时检查．　在决定是否使用脚本语言或系统程序设计语言处理一项特殊任务时考虑以下问题：　★应用程序的主要工作是否是把已经存在的组件联系起来　★应用程序是否要操纵不同种类类型的事物　★应用程序是否包含图形用户界面　★应用程序是否做大量字符串操作　★应用程序函数是否能快速解决问题　★应用程序是否需要可扩展　如果这些问题回答＂是＂就表明这个应用程序使用脚本语言会更好．另一方面，如果对下　面的问题回答＂是＂就表明系统程序设计语言更适合这个应用程序：　★应用程序是否执行复杂的算法或数据结构　★应用程序是否操纵大量数据集（像图像中的所有像素）因而执行速度很重要　★应用程序的函数是否已经定义好，并且很少改动　在过去的　３０　年中，大多数主要的计算机平台同时提供系统编程和脚本语言．　例如，　第一　个脚本语言虽然粗糙，　却是一个　ＪＣＬ（作业控制语言），它被用于在　ＯＳ／３６０　中把工作等级按顺　序排好．个别工作等级由　ＰＬ１，Ｆｏｒｔｒａｎ　或汇编语言书写，那时是系统程序设计语言．在二十　世纪八十年代时　Ｕｎｉｘ　机器上，ｃ　被用于系统编程而　ｓｈ，ｃｓｈ　等壳编程被用于脚本．在二十世　纪九十年代的　ＰＣ　时代里，ｃ　和　ｃ＋＋被用于系统编程　ｅ　而　Ｖｉｓｕａｌ　Ｂａｓｉｃ　用于脚本．在现在已　基本成形的网络时代中，Ｊａｖａ　被用于系统编程而像　ＪａｖａＳｃｒｉｐｔ　，　Ｐｅｒｌ　和　Ｔｃｌ　等语言被用　于脚本．　脚本和系统编程是共生的，共同使用，他们能产生格外强大的编程环境：系统程序设计　语言用于产生令人兴奋的组件，然后用脚本语言把他们组装起来．例如，Ｖｉｓｕａｌ　Ｂａｓｉｃ　的　主要吸引力是系统编程者可以用　ｃ　编写　ＡｃｔｉｖｅＸ　组件，而不太老练的编程者可以在　Ｖｉｓｕａｌ　Ｂａｓｉｃ　应用中使用这些组件．　Ｕｎｉｘ　下编写用于唤醒用　ｃ　编写的应用程序的壳脚本很容易．　在　Ｔｃｌ　普及的一个原因是可以编写执行新命令的　ｃ　代码来扩展该语言的能力． ５．脚本呈上升趋势　脚本语言已经存在了很长时间，但最近几年几个因素的综合结果使它的重要性提高了．　最重要的因素是应用程序综合向胶着应用程序发展的变换．　这种变换的三个实例是图形用户　界面，因特网和组件框架．　图形用户界面出现于二十世纪八十年代早期，　并在二十世纪八十年代晚期得以普及．　在　许多编程项目中图形用户界面占了一半甚至更多的比重．　图形用户界面基于胶着应用：　他的　目标不是创建新的功能，　而是把图形控制集合和应用程序内部函数联系起来．　我不担心任何　快速发展的环境因为图形用户界面基于系统程序设计语言，　不论是　Ｗｉｎｄｏｗｓ　环境，Ｍａｃｉｎｔｏｓｈ　Ｔｏｏｌｂｏｘ　或　Ｕｎｉｘ　Ｍｃｔｉｆ，图形用户界面基于　ｃ　或　ｃ＋＋等已被证明难以掌握，使用不灵活，生　成结果不灵活的语言．一些这样的系统有很好的图形工具来设计屏幕输出并隐藏基本语言，　而一旦设计者不得不编写代码时一切变得困难起来，　像为接口元素提供行为．　所有好的快速　开发图形用户界面环境都基于脚本语言：Ｖｉｓｕａｌ　Ｂａｓｉｃ，Ｈｙｐｅｒｌａｒｄ　和　Ｔｃｌ／ｔｋ，随着图形用　户界面的普及，脚本语言也越来越流行．　因特网的增长也使脚本语言变得大众化．　因特网只是一种胶着工具，　它不创建任何新的　计算结果或数据；　它只是简单的把大量已经存在的事物联系起来．　因特网编程工作的完美工　作之一是让所有连接的组件在一起工作，像脚本语言．例如：Ｐｅｒｌ　因编写　ＣＧＩ　脚本而流行，　ＪａｖａＳｃｒｉｐｔ　因编写网页而流行．　基于脚本的第三个例子是组件框架，像　ＡｃｔｉｖｅＸ，ＯｐｅｎＤｏｃ　和　ＪａｖａＢｅａｎｓ．虽然系统程序　设计语言可以很好的创建组件，　但脚本更适合组装组件到应用程序中．　没有一个好的脚本语　言来操纵组件，　组件框架的大部分功能就都没有了．　这可以部分解释为什么组件框架在个人　电脑上（Ｖｉｓｕａｌ　Ｂａｓｉｃ　提供了方便的脚本工具）比在像　Ｕｎｉｘ／ＣＯＲＢＡ　等组件框架中不包含脚　本的平台上更成功．　脚本语言继续普及的另一个原因是脚本技术的提高．现代脚本语言像　Ｔｃｌ　和　Ｐｅｒｌ　离早　期脚本语言像　ＪＣＬ　的公开宣布已经很远．例如，ＪＣＬ　不提供基本反复而早期　Ｕｎｉｘ　外壳不提　供过程，即使在今天，脚本技术仍然相对不成熟．例如，Ｖｉｓｕａｌ　Ｂａｓｉｃ　不是真正的脚本语　言：它最初执行像一个简单的系统程序设计语言，然后修改使之更适合脚本．以后的脚本语　言将比现在使用的更好．　脚本技术得益于计算机硬件的加速发展．　过去常常用系统程序设计语言在复杂的应用程　序中获得可接受的执行．　某些情况下甚至系统程序设计语言也不够有效，　因此不得不用汇编　编写应用程序．然而，今天的机器比　１９８０　年的快　１００－５００　倍，并且仍在继续以每　１８　个月翻　一番的速度增长．今天，许多应用程序可以用解释后的程序执行，并且仍然有出色的执行．　例如，Ｔｃｌ　脚本可以操纵几千个对象同时提供好的相互响应．由于计算机速度的不断提高，　脚本将对越来越大的应用程序产生吸引力．　脚本语言应用的不断增长最终导致编程群体的改变．二十年前大多数编程者是大型项目　的熟练的编程人员．那个时代的编程人员需要花几个月的时间掌握一门语言和它的编程环境，　系统程序设计语言就是为这些人设计的．然而，自从个人电脑出现以后，越来越多的非专业编　程者加入到编程者的行列．对这些人来说，编程不是他们的主要工作，而只是他们偶尔用来帮　助他们工作的工具．偶然编程的例子是简单的数据库查询或者是巨大的扩展片．偶然编程者　不希望花几个月的时间学习系统程序设计语言但他们可以花几个小时的时间学到足够的脚 本语言知识来写出有用的代码．由于脚本语言由简单的句法并且省略了对象线程等复杂的特　性，因而它比系统程序设计语言要容易学．例如，比较　Ｖｉｓｕａｌ　Ｂａｓｉｃ　和　Ｖｉｓｕａｌ　Ｃ＋＋，很少有偶　尔编程者会选择　Ｖｉｓｕａｌ　Ｃ＋＋，而大部分会用　Ｖｉｓｕａｌ　Ｂａｓｉｃ　建立有用的应用程序．　即使在今天，用脚本语言编写的应用程序的数目也远多于用系统程序设计语言编写的应　用程序的数目．在　Ｕｎｉｘ　系统中有比　Ｃ　程序更多的外部脚本，而在　Ｗｉｎｄｏｗｓ　下　Ｖｉｓｕａｌ　Ｂａｓｉｃ　的编程者和应用程序都比　Ｃ　或　Ｃ＋＋的要多．当然，多数大型和广泛使用的应用程序都是用系统　程序设计语言写成的，所以，如果比较代码总行数或是建立的副本数，则系统程序设计语言略　胜一筹．不管怎么样，脚本语言已经是应用程序开发的主动力，并且今后它的市场份额会继续　提高．　６．对象的作用　６．对象的作用　脚本语言在编程语言和软件工程中通常被专家忽视．取而代之，他们更注重像　Ｃ＋＋和　Ｊａｖａ　等面向对象系统程序设计语言．面向对象编程被认为是代表下一步编程语言发展的主流．像　强类型和继承等面向对象　特征　据说可以减少开发时间，提高软件重用率，并解决包括脚本　语言技巧等其他问题．　面向对象编程实际能提供多少好处？不幸的是，我还没有看到足够的数据可以确切地回答　这个问题．在我看来，对象只能提供一定的好处：或许能提高　２０－３０％的创作力，但决不会有两　倍，更不用说是十倍．现在抱怨　Ｃ＋＋的和喜欢它的一样多，并且一些语言专家开始公开反对面　向对象编程．这一段剩下的部分用于解释为什么对象不能像脚本一样显著地提高创作力，并　讨论脚本语言中可以获得的面向对象编程的好处．　面向对象编程不能显著提高创作力的原因是他没有提高编程层次或鼓励重用．像　Ｃ＋＋等面　向对象语言中编程者仍然使用需要用大量细节来描述和操纵的基本的小单元工作．理论上可　以开发强大的函数库包，并且如果这些函数库被广泛使用就将提高编程层次．然而，这样的函　数库却很少．大多数面向对象语言的强类型使包的定义受限制从而难以重用．每个包都需要　特殊类型的对象，如果两个包在一起工作，就必须写转换代码在两个包需要的类型间进行翻　译．面向对象语言的另一个问题是他们强调继承．当一个类借用为另一个类写的代码时执行　继承并不是一个好主意，它使软件难以管理和重用．它把类的执行绑在一起，因而没有另外一　个类任何一个其它类都不可理解：不知道其继承的方法在父类中如何执行，则无法理解子类；　而不知道其方法如何被子类继承，则无法理解父类．在一个复杂的类继承中，不理解它所继承　的所有其他的类就无法理解任何一个类．更糟的是，一个类无法从它继承的类中被分离以用　于重用．多重继承使这个问题变得更麻烦．执行继承导致和　ｇｏｔｏ　语句被重复执行时所看到的　一样的交错和不可靠．因此，面向对象系统经常不能处理复杂问题并缺少重用．　另一方面，脚本语言实际引起了有效的软件重用．在有趣的组件由系统程序设计语言建立　使他们使用了模块，随后用脚本语言把他们胶着在应用程序中．这种劳动的分割提供了为重　用的自然的框架结构．组件被设计为可重用的组件和脚本间有定义好的接口以利于组件的使　用．例如，在　Ｔｃｌ　中组件是　Ｃ　中执行的常规命令．他们看起来更象是内在的命令，因而更容易在　Ｔｃｌ　脚本中使用．在　Ｖｉｓｕａｌ　Ｂａｓｉｃ　中组件是　ＡｃｔｉｖｅＸ　的扩展，可用于从工具面板直接拖到窗　体中．　不管怎么样，面向对象编程至少提供了两个有用的特性．第一个是封装：对象用某种隐藏执行　细节的方法把数据和代码联系起来．这使管理大型系统更加容易．另一个有用的特性是接口 继承，这涉及提供同样方法的类和　ＡＰＩｓ，即使他们有不同的执行，这时类之间可以相互转化，　从而鼓励重用．　幸运的是，对象的这些好处在脚本语言中可以像在系统程序设计语言中一样实现，并且所　有的脚本语言都提供面向对象编程．例如，Ｐｙｔｈｏｎ　是面向对象脚本语言，Ｐｙｔｈｏｎ　第五版包括　提供对象，Ｏｂｊｅｃｔ　Ｒｅｘｘ　是　Ｒｅｘｘ　的面向对象版本，而　Ｉｎｃｒ　Ｔｃｌ　是　Ｔｃｌ　的面向对象版本．有一　点不同是，脚本语言中的对象事物类型的，而系统程序设计语言中的对象是强类型的．　７．其他语言　７．其他语言　这篇文章不是所有编程语言的全部特性记述．除了类型长度和编程层次以外还有许多编　程语言的其他特性，并且还有许多不能被明确定义为系统程序设计语言或脚本语言的其他有　趣的语言．例如，Ｌｉｓｐ　系统的语言就处于脚本语言和系统程序设计语言之间，两方的特性它　都。

Contents1. WWWH About TCL .............................................................................................................. - 2 -1.1 . What is TCL ................................................................................................................. - 2 -1.2 . Why TCL ..................................................................................................................... - 2 -1.3 . When shall we use TCL ............................................................................................... - 3 -1.4 . How to program using TCL ......................................................................................... - 3 -2. TCL Basics .............................................................................................................................. - 4 -2.1 . Variables and Substitution ............................................................................................ - 4 -2.1.1 Command set and unset ...................................................................................... - 4 -2.1.2 Command append................................................................................................ - 4 -2.1.3 Command incr ..................................................................................................... - 5 -2.2 . Math Expressions ......................................................................................................... - 5 -2.2.1 General Math Expressions .................................................................................. - 5 -2.2.2 Math Functions ................................................................................................... - 6 -2.3 . String Manipulation ..................................................................................................... - 7 -2.3.1 Command string .................................................................................................. - 7 -2.3.2 Command format .............................................................................................. - 12 -2.3.3 Regular Expression ........................................................................................... - 14 -2.4 . List Manipulation ....................................................................................................... - 18 -2.4.1 Basic TCL List Commands ............................................................................... - 18 -2.4.2 Advanced TCL List Commands ........................................................................ - 20 -2.5 . File Operations ........................................................................................................... - 23 -2.5.1 Command open ................................................................................................. - 23 -2.5.2 Command file .................................................................................................... - 26 -2.6 . Control Flow .............................................................................................................. - 29 -2.6.1 The if command ................................................................................................ - 29 -2.6.2 Looping and Loop Control commands .............................................................. - 30 -3. TCL extensions ..................................................................................................................... - 32 -3.1 . TCL Package Expect .................................................................................................. - 32 -3.2 . TCL Package Tnm ...................................................................................................... - 33 -4. Appendix ............................................................................................................................... - 36 -4.1 . Appendix A, String Commands .................................................................................. - 36 -4.2 . Appendix B, List Commands ..................................................................................... - 37 -4.3 . Appendix C, Flow Control Commands ...................................................................... - 38 -4.4 . Appendix D, Math Functions ..................................................................................... - 38 -4.5 . Appendix E, References ............................................................................................. - 39 -1. WWWH About TCL本文是针对那些对TCL没有或者有一些基础认识的测试工程师，这个标题中的WWWH 并不是一个英文单词，而是一个缩写，这个缩写所提出的问题也基本上是本文所要提出并解决的问题；他们分别是What—什么是TCL、Why—为什么要使用TCL、When—什么时候我们该使用TCL、How—如何使用TCL。

T c l脚本语言教程(总37页)--本页仅作为文档封面，使用时请直接删除即可----内页可以根据需求调整合适字体及大小--Tcl教程TCL语法■脚本、命令和单词符号 (2)■置换(substitution) (2)■注释 (5)变量■简单变量 (5)■数组 (6)■相关命令 (6)表达式■操作数 (7)■运算符和优先级 (7)■数学函数 (8)List■list命令 (10)■concat命令 (10)■lindex命令 (11)■llength命令 (11)■linsert命令 (11)■lreplace命令 (11)■lrange 命令 (11)■lappend命令 (12)■lsearch 命令 (12)■lsort命令 (13)■split命令 (13)■join命令 (13)控制流■if命令 (13)■循环命令：while 、for、 foreach (14)■eval命令 (15)■source命令 (16)过程(procedure)■过程定义和返回值 (16)■局部变量和全局变量 (17)■缺省参数和可变个数参数 (17)■引用：upvar (18)字符串操作■format命令 (19)■scan命令 (20)■regexp命令■regsub命令■string命令文件访问■文件名■基本文件输入输出命令■随机文件访问■当前工作目录■文件操作和获取文件信息错误和异常■错误■从TCL脚本中产生错误■使用catch捕获错误■其他异常深入TCL■查询数组中的元素■info命令TCL语法 > 脚本、命令和单词符号一个TCL脚本可以包含一个或多个命令。

命令之间必须用换行符或分号隔开，下面的两个脚本都是合法的：set a 1 set b 2或set a 1；set b 2TCL的每一个命令包含一个或几个单词，第一个单词代表命令名，另外的单词则是这个命令的参数，单词之间必须用空格或TAB键隔开。

系统学习TCL脚本入门教程版本：1. 0作者：次目录1TCL语法 (4)1.1 简介 (4)1.2 运行环境 (4)1.3 本文约定 (4)1.4 参考资料 (4)2引言 (5)2.1 第1课：简单文本输出 (5)2.2 第2课：给变量赋值 (5)2.3 第3课：命令的赋值与置换一 (6)2.4 第4课：命令的赋值与置换二 (7)2.5 第5课：命令的赋值与置换三 (7)2.6 第6课：算数运算 (8)2.7 第7课：文本比较－SWITCH应用 (9)2.8 第8课：数值比较－IF应用 (10)2.9 第9课：WHILE循环 (11)2.10 第10课：FOR循环和INCR (11)2.11 第11课：过程PROC (12)2.12 第12课：过程PROC的参数定义 (13)2.13 第13课：变量的作用域 (13)2.14 第14课：LIST结构 (14)2.15 第15课：LIST项的增删改 (15)2.16 第16课：更多LIST相关 (16)2.17 第17课：字符串函数 (17)2.18 第18课：更多字符串函数 (17)2.19 第19课：修改字符串函数 (20)2.20 第20课：正则表达式 (21)2.21 第21课：更多正则表达式 (22)2.22 第22课：数组 (24)2.23 第23课：更多数组相关 (25)2.24 第24课：文件存取 (28)2.25 第25课：文件信息 (30)2.26 第26课：TCL中的子进程调用－OPEN & EXEC (33)2.27 第27课：命令或者变量是否存在－INFO (34)2.28 第28课：解释器状态－INFO (35)2.29 第29课：过程信息－INFO (36)2.30 第30课：模块化－SOURCE (37)2.31 第31课：建库－UNKNOWN & INFO LIBRARY (38)2.32 第32课：创建命令－EV AL (40)2.33 第33课：在EV AL中应用FORMAT & LIST (40)2.34 第34课：不使用EV AL替换－FORMAT & SUBST (42)2.35 第35课：改变工作目录－CD & PWD (43)2.36 第36课：调试和错误－ERRORINFO & ERROR C ODE & CATCH (44)2.37 第37课：调试－TRACE (45)2.38 第38课：命令行参数和环境串 (46)2.39 第39课：TIME & UNSET (47)2.40 第40课：SOCKET & FILEEVENT & VWAIT (49)2.41 第41课：日期时间－CLOCK (51)2.42 第42课：I/O通道－FBLOCKED & FCONFIG (53)2.43 第43课：子解释器 (56)2.44 第44课：数据库操作 (57)2.45 第45课：函数或过程数组的输入和输出方法 (59)2.46 第46课：INFO的用法 (60)2.47 第47课：多线程 (61)3跋 (75)1TCL语法1.1简介作为脚本语言，tcl语法简单而功能强大。

tcl脚本测试入门Tcl简介Tcl是一种非常简单的编程语言，如果你以前曾经学过编程，那么你只要学习几个小时就可以编写出一些有趣的Tcl程序。

本文将对Tcl的功能做一个大概的介绍。

一般来说，读完本文之后，你就可以开始独立的编写一些简单的Tcl脚本了；不过，要想获得更全面的认识，我们建议你还是去参考几本目前已经出版的Tcl书籍。

基本语法Tcl脚本由一些被换行符或是分号分开的命令所组成。

命令都有相同的基本格式，如下面的例子所示：expr 20 + 10 该命令计算20加10的和，并返回结果30。

你可以把这个例子以及本文中的所有其它的例子键入到tclsh这样的Tcl应用程序中来验证它们；在一个命令结束后，tclsh将打印出它的结果。

每个Tcl命令都含有一个或多个被空格分开的单词，在这个例子中有4个单词：expr,20,+,和10。

第一个单词是一个命令名，其余的单词是这个命令的参数。

所有的Tcl命令都含有一些单词，但不同的命令对他们的参数有不同的处理方式。

expr命令把它的所有参数看作是一个算术表达式，计算表达式的结果，并以字符串的形式返回结果。

在expr命令中，单词之间的分隔不是很重要：同样的命令你可以写成这种形式：expr 20+10 不过，对大部分的命令来说，单词的结构是很重要的。

每个单词都会用于不同的目的。

所有的Tcl命令都返回结果。

如果一个命令产生了没有意义的结果，那么它将返回一个空字符串作为它的结果。

变量Tcl允许你在变量中保存数值，并且可以在后续的命令中使用这些数值。

set命令用于对变量进行读写操作。

比如，下面的命令对变量x赋值为32。

set x 32 这个命令返回变量的新值。

你可以让set只带一个参数来读出变量的数值：set x 你不需要在Tcl中声明变量：变量在第一次set的时候被自动创建。

Tcl变量没有类型：任何值可以赋给任何变量。

要想在一个命令中使用变量的值，可以采用变量替代，如下例所示：e xpr $x*3 当一个字符$出现在一个命令中的时候，Tcl把跟在它后面的字母和数字看作是一个变量名并且将其替换成变量的值。