TCL学习之字符串函数

这篇文章主要讲一下TCL语言中用到的字符串函数，以及它们的用法。

1.string  length :返回字符串的长度

2.string index :返回字符串相应位置的字符

3.string range:返回字符串中一个范围内的字符串

示例如下，用到了这三个函数： 

set string"this is my test string"puts "there are [string length $string]charaters in \"string\""puts "[string index $string 1] is the second character in\"$string\""puts "\"[string range $string 5 10]\" are characters between the 5th and 10th"

4.string compare string1,string2:字符串比较，当string1小于string2时，返回-1，大于时返回1，等于时返回0.

5.string first string1 string2:返回string1在string2中第一次出现的位置；如果string1不在string2中，返回-1

6.string last string1 string2:返回string1在string2中最后一次出现的位置，如果string1不在string2中，返回-1

set string "abcdeabcd"set first [string first "ab" $string]set last [string last "ab" $string]

7.string wordstart string1 index:返回string1中index处的单词第一次出现的位置

8.string wordend string1 index:返回string1中index处的单词最后一次出现的位置

set word "1 12 123"puts "wordstart:[string wordstart $word 1]"puts "wordend:[string wordend $word 1]"

9.string match pattern string1：返回string1中是否满足匹配模式pattern

set path "CVS/entries"if { [string match "*CVS*" $path]} {puts "$path is part of the source code control tree"}