脚本语言TCL教程: 1

1.1 ：简单文本输出

1． 注释符号是＃或者 ;# ，在命令后注释用 ;# ，在行开头两者均可；

2． puts ：输出文本，多个单词如被空格或TAB分隔需要使用“”或{} 括起来；

3． 多个命令写在一行使用 ; 间隔。

例子：002_puts.tcl

# ok ;# 正确

;# ok ;# 正确

; # ok ;# 正确, 分号和井号之间可以有空格

puts Hello ;# 正确

puts Hello,World ;# 正确，多个单词之间不是被空格或者TAB分隔开

puts Hello World ;# 这行命令运行出错，被空格分隔

puts "Hello, World - In quotes" ;# 注释

puts {Hello, World - In Braces} # 这行命令运行出错，必须使用 ;# 作为注释符号

puts "This is line 1"; puts "this is line 2" ;# 正确，用分号分隔两个命令

puts "Hello, World; - With a semicolon inside the quotes" ;#正确，分号在双引号内，作为字符串一部分

1.2 ：给变量赋值

1． set：给变量赋值，格式为 set var value

例子：003_var.tcl

;# 给变量X赋一个字符串

set X "This is a string"

;# 给变量Y赋一个数字

set Y 1.24

;# 显示X和Y的内容

puts $X

puts $Y

;# 打印一个分隔串

puts "..............................."

;# 打印在一行中，推荐使用双引号

set label "The value in Y is: "

puts "$label $Y"

puts $label$Y

1.3 ：命令的赋值与置换一

1． TCL中命令的赋值分为置换和赋值两个步骤

2． 续行符为 \

3． 转义符同为 \

4． 特殊字符列表：

序号	字符	输出	十六进制
1	\a	响铃	\x07
2	\b	回车	\x08
3	\f	清屏	\x0c
4	\n	换行	\x0a
5	\r	回车	\x0d
6	\t	制表符	\x09
7	\v	垂直制表符(Vertical Tab)	\x0b
8