format命令
因为 TCL 把所有的输入都当作字符串看待，所以 TCL 提供了较强的字符串操作功能，TCL 中与 字符串操作有关的命令有：string、format、regexp、regsub、scan 等。
语法：format formatstring ?vlue value...?
format 命令类似于 ANSIC 中的 sprintf 函数和 MFC 中 CString 类提供的 Format 成员函数。 它按 formatstring 提供的格式，把各个 value 的值组合到 formatstring 中形成一个新字符串， 并返回。例如：
%set name john
输出：John
%set age 20
输出：20
%set msg [format "%s is %d years old" $name $age]
输出：john is 20 years old
scan命令
语法：scan string format varName ?varName ...?
scan 命令可以认为是 format 命令的逆，其功能类似于 ANSI C 中的 sscanf 函数。它按 format 提供的格式分析 string 字符串，然后把结果存到变量 varName 中,注意除了空格和 TAB 键之 外，string 和 format 中的字符和'%'必须匹配。例如：
% scan "some 26 34" "some %d %d" a b
输出：2
% set a
输出：26
% set b
输出：34
% scan "12.34.56.78" "%d.%d.%d.%d" c d e f
输出：4
% puts [format "the value of c is %d,d is %d,e is %d ,f is %d" $c $d $e $f]
输出：the value of c is 12,d is 34,e is 56 ,f is 78
scan 命令的返回值是匹配的变量个数。而且，我们发现，如果变量 varName 不存在的话，TCL 会自动声明该变量。
regexp命令
语法：regexp ?switchs? ?--? exp string ?matchVar?\ ?subMatchVar subMatchVar...?
regexp 命令用于判断正规表达式 exp 是否全部或部分匹配字符串 string，匹配返回 1，否则 0。
在正规表达式中，一些字符具有特殊的含义，下表一一列出，并给予了解释。
下面的一个例子是从《Tcl and Tk ToolKit》中摘下来的，下面进行说明：
^((0x)?[0-9a-fA-F]+|[0-9]+)$
这个正规表达式匹配任何十六进制或十进制的整数。
两个正规表达式以|分开(0x)？[0-9a-fA-F]+和[0-9]+，表示可以匹配其中的任何一个，事实 上前者匹配十六进制，后者匹配的十进制。
^表示必须从头进行匹配，从而上述正规表达式不匹配 jk12 之类不是以 0x 或数字开头的串。
＄表示必须从末尾开始匹配，从而上述正规表达式不匹配 12jk 之类不是数字或 a-fA-F 结尾的 串。
下面以(0x)？[0-9a-fA-F]+ 进行说明，(0x)表示 0x 一起作为一项，?表示前一项(0x)可以出 现 0 次或多次，[0-9a-fA-F]表示可以是任意 0 到 9 之间的单个数字或 a 到 f 或 A 到 F 之间的 单个字母，＋表示象前面那样的单个数字或字母可以重复出现一次或多次。
% regexp {^((0x)?[0-9a-fA-F]+|[0-9]+)$} ab
输出：1
% regexp {^((0x)?[0-9a-fA-F]+|[0-9]+)$} 0xabcd
输出：1
% regexp {^((0x)?[0-9a-fA-F]+|[0-9]+)$} 12345
输出：1
% regexp {^((0x)?[0-9a-fA-F]+|[0-9]+)$} 123j
输出：0
如果 regexp 命令后面有参数 matchVar 和 subMatchVar，则所有的参数被当作变量名，如果 变量不存在，就会被生成。 regexp 把匹配整个正规表达式的子字符串赋给第一个变量，匹配 正规表达式的最左边的子表达式的子字符串赋给第二个变量，依次类推，例如：
% regexp { ([0-9]+) *([a-z]+)} " there is 100 apples" total num word
1
% puts " $total ,$num,$word"
100 apples ,100,apples
regexp 可以设置一些开关（switchs〕，来控制匹配结果：
regsub命令
语法：regsub ?switchs? exp string subSpec varname
regsub 的第一个参数是一个整个表达式，第二个参数是一个输入字符串，这一点和 regexp 命 令完全一样，也是当匹配时返回 1，否则返回 0。不过 regsub 用第三个参数的值来替换字符串 string 中和正规表达式匹配的部分，第四个参数被认为是一个变量，替换后的字符串存入这个 变量中。例如：
% regsub there "They live there lives " their x
1
% puts $x
They live their lives
这里 there 被用 their 替换了。
regsub 命令也有几个开关(switchs):
-nocase 意义同 regexp 命令中。
-all 没有这个开关时，regsub 只替换第一个匹配，有了这个开关，regsub 将把所有匹配的地 方全部替换。
-- 意义同 regexp 命令中。
string命令
string 命令的语法：string option arg ?arg...?
string 命令具有强大的操作字符串的功能，其中的 option 选项多达 20 个。下面介绍其中常用 的部分。
1、string compare ?-nocase? ?-length int? string1 string2
把字符串 string1 和 string2 进行比较,返回值为-1、0 或 1,分别对应 string1 小于、等于或大 于 string2。如果有 -length 参数，那么只比较前 int 个字符，如果 int 为负数，那么这个参 数被忽略。 如果有 -nocase 参数，那么比较时不区分大小写。
2、string equal ?-nocase? ?-length int? string1 string2
把字符串 string1 和 string2 进行比较，如果两者相同，返回值为 1，否则返回 0。其他参数与 8.5.1 同。
3、string first string1 string2 ?startindex?
在 string2 中从头查找与 string1 匹配的字符序列，如果找到，那么就返回匹配的第一个字母 所在的位置(0-based)。如果没有找到，那么返回-1。如果给出了 startindex 变量，那么将从 startindex 处开始查找。例如：
% string first ab defabc
输出：3
% string first ab defabc 4
输出：-1
4、string index string charIndex
返回 string 中第 charIndex 个字符(0-based)。charIndex 可以是下面的值：
整数 n: 字符串中第 n 个字符(0-based)
end : 最后一个字符
end－整数 n：倒数第 n 个字符。string index "abcd" end-1 返回字符'c'
如果 charIndex 小于 0，或者大于字符串 string 的长度，那么返回空。
例如:
% string index abcdef 2
输出：c
% string index abcdef end-2
输出：d
5、string last string1 string2 ?startindex?
参照 3.唯一的区别是从后往前查找
6、string length string
返回字符串 string 的长度.
7、string match ?-nocase? pattern string
如果 pattern 匹配 string,那么返回 1,否则返回 0.如果有-nocase 参数,那么就不区分大小写.
在 pattern 中可以使用通配符:
* 匹配 string 中的任意长的任意字符串,包括空字符串.
? 匹配 string 中任意单个字符
[chars] 匹配字符集合 chars 中给出的任意字符,其中可以使用 A-Z 这种形式
\x 匹配单个字符 x,使用'\'是为了让 x 可以为字符*,-,[,].
例子:
% string match * abcdef
输出：1
% string match a* abcdef 1 string match a?cdef abcdef
输出：1
% string match {a[b-f]cdef} abcdef //注意一定药用'{',否则 TCL 解释器会把 b-f 当作命 令名
输出：1 //从而导致错误
% string match {a[b-f]cdef} accdef
输出：1
8、string range string first last
返回字符串 string 中从第 first 个到第 last 个字符的子字符串(0-based)。如果 first<0，那么 first 被看作 0，如果 last 大于或等于字符串的长度，那么 last 被看作 end，如果 first 比 last 大，那么返回空。
9、string repeat string count
返回值为：重复了 string 字符串 count 次的字符串。例如：
% string repeat "abc" 2
输出：abcabc
10、string replace string first last ?newstring?
返回值为：从字符串 string 中删除了第 first 到第 last 个字符(0-based)的字符串，如果给出 了 newstring 变量，那么就用 newstring 替换从第 first 到第 last 个字符。如果 first<0，那 么 first 被看作 0，如果 last 大于或等于字符串的长度，那么 last 被看作 end，如果 first 比 last 大或者大于字符串 string 的长度或者 last 小于 0，那么原封不动的返回 string 。
11、string tolower string ?first? ?last?
返回值为：把字符串 string 转换成小写后的字符串，如果给出了 first 和 last 变量，就只转换 first 和 last 之间的字符。
12、string toupper string ?first? ?last?
同 11。转换成大写。
13、string trim string ?chars?
返回值为:从 string 字符串的首尾删除掉了字符集合 chars 中的字符后的字符串。如果没有给出 chars，那么将删除掉 spaces、tabs、newlines、carriage returns 这些字符。例如:
% string trim "abcde" {a d e}
输出：bc
% string trim " def
> "
def
14、string trimleft string ?chars?
同 13。不过只删除左边的字符。
15、string trimright string ?chars?
同 13。不过只删除右边的字符。
