前言
字符串的处理是每种语言经常会遇到的问题,tcl作为一门脚本语言自然也不例外,关于字符串的拆分,一般会有两种情况:1.使用单个字符拆分,2.使用字符串拆分。
使用单个字符拆分字符串
如图所示,使用单个字符可以轻松地分割字符串。
![在这里插入图片描述](https://i-blog.csdnimg.cn/blog_migrate/336bbad40b5dedd19ddae12c32ec56fb.png)
使用字符串拆分字符串
当我们使用字符串拆分字符串,tcl会使用字符串中的每个字符来拆分,无法达到我们的目的。
![在这里插入图片描述](https://i-blog.csdnimg.cn/blog_migrate/ab6ff42fcefe042ceb98c290ce82ca3e.png)
这时我们可以定义一个快捷的方法来使用字符串拆分字符串,如下是我新建的一个split.tcl文件的内容:
1 proc OnePiece {
str sep} {
2 split [string map