2.1 puts
Tcl的输出命令是puts,将字符串标准输出channelled。语法中两个问号之间的参数为可选参数。
# 例1
puts hello
# 输出
hello
# 例2
puts -nonewline "hello hello"
# 输出
hello hello
- 如果输出一段有空格的文本,则要用双引号("")或花括号({})起来。
- -nonewwhile选项告诉puts不输出回车换行。
注意:双引号和花括号的作用是将多个词组织成一个变元,但是""和{}是由区别的。""在进行替换操作的时候,前者允许替换操作发生;{}会阻止替换。
2.2 set
set varName [value]
unset vaName
- set:变量定义和赋值命令,不必制定变量值得类型,因为变量值得类型只有一种--字符串。在为变量进行赋值的时候,会为变量开辟一段内存空间来存储变量值
- set VarName不跟变量的值,如果变量已经定义,则返回变量的值,效果和puts相同;变量不存在会返回错误信息。相当于查询的作用。
- unset与set的作用相反,它取消变量的定义,并释放变量所占的内存空间
- 通过前置的“$”符,可以引用变量的值(替换)。
set a Hello # 定义变量a并为其赋值
puts $a # a=Hello
set a "Test Tcl" # 重新给a赋值
set a # 输出Test Tcl
puts a # 输出字符a
set b $a # 定义变量b,并将a的值赋值给b b=Test Tcl
puts $b # b = Test Tcl
unset a # 释放变量
puts $a # 试图输出未定义的变量值,会进行输出
- puts $a由两步完成:首先用a的值替换$a,替换后的命令变为puts {Test Tcl},然后输出字符串。也就是说先替换后输出。
- 数组定义在后面进行介绍。
2.3 替换
2.3.1 $
$实现引用替换,用来引用参数值。
tcl在使用$进行引用替换的时候,只会进行一次解释,嵌套使用$$xxxx,只有一个起作用。
set foo oo
set dollar foo
set x $$dollar # x = $foo
set y {$foo} # y = $foo {}阻止替换
set z $x # z = $foo
- $$dollar,将$dollar用dollar的值foo进行替换,前面的$不起作用,作用字符输出。
2.3.2 []
方括号[]书写完整的命令替换,[]中的执行后,返回结果。
set b [set a 5] # set a 5命令输出的结果赋值给b b=5
puts b # b = 5
set c [expr 5*10] # 将乘式的结果赋值给c
puts c # c = 50
""和{}将多个单词阻止在一起组成一个参数,也是一种替换操作。一般在""内进行正常替换,在{}中的替换可能被阻止。当{}用于组织算数表达式、if条件和函数内执行体的代码块的时候,不会阻止替换。
set s hello
puts stdout "The length of\"$s\" is [string length $s]"
=>The length of hello is 5
# ""内再使用双引号的时候要使用转义字符。
# string length $s 计算字符串s的字符串长度
puts stdout {The length of $s is [string length $s]} # 替换操作被阻止
=>The length of $s is [string length $s]
set x 10
set y 20
set z [expr{$x + $y}]
=>30
if{$x == 10} {puts "x = $x"}
=>x=10
- expr表示进行数学运算,要用[]括起来
- 用{}来组织算数运算表达式,不阻止$替换操作
- 在条件语句中,用{}来界定条件体和执行体,不阻止内部的替换
2.3.4 \
反斜杠“\”的作用是引用特殊字符或者续行。
应用特殊字符的操作是告诉TCl解释器需要使用一些特殊的字符,如$符或者完成特定功能比如\n,\t,\b.....,相当于转义字符的作用。
如果一条语句过长,可以使用“\”,将一行语句分为多行进行书写。
set x 100
set y $x # y = 100
set z "\$x" # z = $x \$表示告诉tcl使用$符号
puts "he \nllo" # \n换行
=>he
llo
puts "\a" # 振铃
set b [puts \
$y]
注意:当用set命令为参数,赋值,并""用作续行符的时候,不要在反斜杠后面同一行上输入任何符号,包括空格和制表符。否则反斜杠(\)就起不到续行的功能,容易引起错误。