用TCL中的regsub命令，不改变尖括号中的内容，将尖括号改成方括号，如何实现？？？

manxxxxx · 发表于 2012-12-18 16:57:01

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？注册

x

比如，想把limiter_ctrl<5> 改成 limiter_ctrl[5],如何用regsub命令实现？？

set name limiter_ctrl<5>
=>limiter_ctrl<5>
regsub "<\d>" $name "[\d]" chname

这样会报错。关键是regsub后的第二项正则匹配怎么写啊？？望牛人指教。。。谢谢

manxxxxx · 发表于 2012-12-18 17:26:19

可以用两次regsub实现，regsub "<" $name "\[" chnam1;regsub ">" $chname1 "\]" chname
,但不知道怎么用一次regsub实现。。。

dlm_dlm · 发表于 2012-12-19 09:06:03

regsub {<([^>]+)>} $a {[\1]} b
你试试看，我的变量是a和b

manxxxxx · 发表于 2012-12-19 23:08:00

回复 3# dlm_dlm

恩恩，可以！谢谢。。
明白了，是这样的：([^>]+) 是指非">"字符的一个或多个其它任意字符，[\1],\1是指前面正则表达式中第一个匹配到的子字符，本例中就一个匹配子字符：[^>]+，是这个意思吧？

sjtusonic · 发表于 2012-12-20 08:39:19

回复 1# manxxxxx

试试看tr这个命令

dlm_dlm · 发表于 2012-12-20 17:43:00

回复 4# manxxxxx

bingo

xychzkhf · 发表于 2012-12-29 17:42:47

用eval这个命令可以解决

xychzkhf · 发表于 2012-12-30 00:26:51

最简单的办法 regsub -all "<5>" $name {[5]} chname

[求助] 用TCL中的regsub命令，不改变尖括号中的内容，将尖括号改成方括号，如何实现？？？

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子

站长推荐 /2

[求助] 用TCL中的regsub命令， 不改变尖括号中的内容，将尖括号改成方括号，如何实现？？？

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子

站长推荐 /2

[求助] 用TCL中的regsub命令，不改变尖括号中的内容，将尖括号改成方括号，如何实现？？？