TCL基础教程——(4)字符串处理

1、TCL 基础教程 一一(4)字符串处理对于任何一种脚本语言来说， 强大的字符串处理功能都是为人们所津津乐道的， TCL 也不例 外，那么究竟 TCL 的字符串处理有什么功能呢？下面将介绍简单模式匹配， 在日后的文章中， 还 将介绍正则表达式。Stri ng 命令Stri ng 命令实际上是一组操作字符串的命令，它的第一个变元决定了进行什么样子的操作,所有 String 的命令如下：命令说明stri ng bytele ngth str返回用于存储字符串的字节数，由于 UTF8 编码的原因，这个长度可能与 str ing len gth返回长度不一样stri ng compare ?-no ca

2、se? ?-le ngth len?Stri str2根据词典顺序比较两个字符串，nocase 表示忽略大小与，length 表示比较前 n 个字符，如果相冋 返回值为 0，如果 stri 靠前就返回-1，对于其他 情况返回 1stri ng equal ?- no case? Stri str2比较字符串，如果相同返回1,否则-1，使用nocase 来表示忽略大小与string first stri str2返回 str2 中 str1 第一次岀现的位置，如果没有 的话，就返回-1。string is class ?-strict? ?-failindex varn ame? stri ng

3、如果 string 属于某个 class 就返回，如果指定了 strict，那么就不匹配空字符串，否则总是要匹配，如果指定了failindex，就会将在 string中阻止其称为 class 一员的字符串索引赋给var name，str ing last stri str2返回 str2 中 str1 最后一次岀现的位置，如果没 有岀现就返回-1str ing len gth str返回 string中的字符个数string map ?-nocase? charMap string返回一个根据 charmap 中输入输岀列表将 string 中的字符进行映射后产生的字符串。str ing ma

4、tch pattern str如果 str 匹配 pattern 就返回 1，否则返回 0，str ing ran ger str i j返回字符串中从 i 到 j 的部分。str ing repeat str cou nt返回将 str 重复 count 次的字符串string replace str first last ?newstr?返回一个通过把从first 到 last 字符串替换为newstr 的新字符串，或是返回空string tolower string ?first? ?last?返回 string的小写形式，first 和 last 决定了字符串位置stri ng tot

5、itle stri ng ?first? ?last?将第一个字符替换为大与，其他为小与，first和 last 决定了字符串位置string toupper string ?first? ?last?返回 string的大写格式，first 和 last 决定了字符串位置string trim string ?chars?从 string 两端除去 chars 中指定的字符，chars默认空string trimleft string ?chars?从 string 的左端除去 chars 中指定的字符，chars默认为空string trimright string ?chars?从 st

6、ring 的右端除去 chars 指定的字符， chars默认为空string wordend str ix返回 str 中在索引 ix 位置包含的字符的单词之后的字符的索引位置string wordstart str ix返回str中在索引ix位置包含字符串的单词中第 一个字符的索引位置。对于我来说，常用的有如下几个方法，length , equal , match , range , first 。请看下面的程序ppcor n localhost ppcor n$ cat strtest.tcl#!/usr/bi n/tclshset str1 str1set str2 str1set s

7、tr3 isstr1?set str4 the index of strl# print the length of str1,the value should be 4puts string length $str1# print the str1 equal str2, the value should be 1puts stri ng equal $str1 $str2# print the str2 match str3, the value should be 1puts stri ng match *$str1* $str3# print the 4 to 9 of str4, the value should be in dexputs stri ng range $str4 4 9# print the postion of first str1 in str4, the value should be 13puts stri ng first $str1 $str4ppcor n localhost ppcor n$ ./strtest.tcl411in dex13请注意一下 string match 的用法，中间使用了 *$str1*的用法，这里使用了模糊匹配。共有三种进行匹配的方式*匹配任意数量字符?确切的匹配一个字符chars匹配 char