下载文档原格式
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提供了丰富的数学计算功能，包括基本的算术运算、数学函数、随机数生成等。
本教程将介绍如何在TCL中进行数学计算。
1.基本的算术运算TCL支持常见的四则运算，可以使用加号"+"、减号"-"、乘号"*"、除号"/"进行加、减、乘、除运算。
例如：``` tclset a 10set b 5set c [expr $a + $b] # 加法运算set d [expr $a - $b] # 减法运算set e [expr $a * $b] # 乘法运算set f [expr $a / $b] # 除法运算```运行以上代码后，变量`c`的值为15，`d`的值为5，`e`的值为50，`f`的值为22.数学函数TCL提供了许多数学函数，可以对数字进行各种计算。
常用的数学函数包括求幂、开方、对数等。
例如：``` tclset x 2set y 3set z [pow $x $y] # 求x的y次幂set sqrtz [sqrt $z] # 对z进行开平方set logz [log $z] # 对z取对数```运行以上代码后，变量`z`的值为8，`sqrtz`的值为2，`logz`的值为2.0793.随机数生成TCL可以生成伪随机数，可以使用`rand`函数生成随机数。
例如：``` tclset randNum [expr rand(] # 生成一个0到1之间的随机数set randInt [expr int(rand(*10)] # 生成一个0到9之间的随机整数```运行以上代码后，`randNum`的值为0到1之间的随机数，`randInt`的值为0到9之间的随机整数。
4.数学常数TCL提供了一些常见的数学常数，如pi和自然常数e，可以直接使用。
Tcl基础学习（1）：简单⽂本输出（puts）与变量赋值（set）Tcl是⼀种解释语⾔，每条语句被⼀次解析并⽴即执⾏，该语⾔在脚本遇到错误后会⽴即停⽌。
Tcl在其脚本中遵循的基本语义：每条Tcl语句以换⾏符/分号 " ; " 结束如果⼀条语句跨多⾏，应在⾏尾加反斜杠 “\” ，才能在下⼀⾏继续执⾏每条语句及参数都被视为字符串格式如果字符串内有多个单词，使⽤双引号 “” 和⼤括号{}包括成⼀个单独的单元有空格分隔的多个单词则被认为是命令的多个参数（每个参数相当于⼀个单元）以“#”开头的语句认为是Tcl的注释puts：输出字符串的命令1.#This is a comment befor the commandputs "hello,world!”;#This is a comment afer the commandhello,world!2.puts "hello,world!” #This is a comment afer the commandwrong # args: should be "puts ?-nonewline? ?channalID? string"3.puts {hello,world! -1}hello,world! -14.puts hello world!;cannot find a channal named 'hello'set：Tcl赋值命令当set赋予两个参数进⾏调⽤时：set varName ?value?1. 如果value被指定，变量varName的内容被设置为Value2. 如果varName只包含字母字符，没有圆括号那它就是标量变量3. 如果varName中有varName（index）的形式，那它及时关联数组的元素获取数组中的索引值：array names varName返回值：indexset abc "123";#变量abc赋值为123123set def(1) 123;#def为数组变量，1为索引，123为数组变量def(1)的赋值123set def(test) 123;#def为数组变量，test为索引(索引可以为字符)，123为数组变量def(1)的赋值123array names def;# array names 获取数组def中的索引值test 1当需要使⽤puts对变量进⾏求值时，需要使⽤美元符号 $set a 15;#a为变量名，15为变量的值puts $a;#打印a的值15符号 $的使⽤$在变量求值时有特殊含义，在想要使⽤对$打印时，必须在前⾯加上反斜杠"\"在使⽤$对变量求值时，不能放在⼤括号内例如：puts {Value is $a}; #命令⽆效在⼤括号内使⽤$只有⼀种情况，即对表达式进⾏计算时 eg：expr $x+2; expr{$x+2};。
TCL语⾔笔记：TCL基础语法⼀、什么是TCLTcl 全称是 Tool command Language。
它是⼀个基于字符串的命令语⾔，基础结构和语法⾮常简单，易于学习和掌握。
Tcl 语⾔是⼀个解释性语⾔，所谓解释性是指不象其他⾼级语⾔需要通过编译和联结，它象其他 shell 语⾔⼀样，直接对每条语句顺次解释执⾏。
Tcl 数据类型简单。
对 Tcl 来说，它要处理的数据只有⼀种——字符串。
Tcl 将变量值以字符串的形式进⾏存储，不关⼼它的实际使⽤类型。
⼆、TCL的基本语法1.输出：tcl使⽤”puts"关键字来作为输出语句[语法] : puts ?-nonewline? ?channelId? stringTcl 的输出命令是“puts”，将字符串输出到标准输出channelId。
语法中两个问号之间的参数为可选参数。
puts hello结果=> helloputs –nonewline "hello hello"结果=>hello hello但如果输出⼀段有空格的⽂本，则要⽤双引号或者花括号括起来-nonewline 选项告诉 puts 不输出回车换⾏。
注意：双引号和花括号的作⽤是将多个词组织成⼀个变元，但他们是有差别的！这种差别就是在处理“替换操作”时，前者允许替换发⽣，⽽后者则可能会阻⽌替换。
关于两者⽤法与差别以后会陆续讲到。
在这⾥两者作⽤相同。
2.赋值： tcl 使⽤“set”关键字来定义参数，不必指定变量值的类型，因为变量值的类型仅⼀种——字符串。
为变量赋值时，会为变量开辟⼀段内存空间来存储变量值。
[语法] set varName [value]set a Hello ;#定义变量 a 并赋值=>Helloputs $a ;#输出变量值=>Helloset a “Hello world” ;#重新赋值=>Hello worldset a “Hello world”=> Test Tcl ;#输出变量值，此时不加”$”puts $a=>Hello world ;#输出变量值，此时要加”$”puts a=> a ;#输出字符”a”set b $a=>Hello worldputs $b=>Hello world ;#将 a 的值赋给 b3.替换(1):$“$”符实现引⽤替换，⽤以引⽤参数值。
