Regex 为什么'；我的正则表达式与字符串不匹配吗？_Regex_Tcl

Regex 为什么'；我的正则表达式与字符串不匹配吗？

regex tcl

Regex 为什么'；我的正则表达式与字符串不匹配吗？,regex,tcl,Regex,Tcl,我想使用以下正则表达式匹配D11-RONPLAYER_DEF_15_PO： "D\[0-9]+-\[A-Z]*PLAYER_(DEF\[0-9]*)_(\[^_]+)_" 但它并不匹配。如何使其工作？这对我来说适用于您的示例输入： regexp {D\d+-[A-Z]*PLAYER_(DEF_\d*)_([^_]+)} $str match sub1 sub2 打印匹配组会产生： % puts "$sub1\n$sub2" DEF_15 PO 不太确定，但在正则表达式中DEF之后似乎缺少一

我想使用以下正则表达式匹配

D11-RONPLAYER_DEF_15_PO

：

"D\[0-9]+-\[A-Z]*PLAYER_(DEF\[0-9]*)_(\[^_]+)_"

但它并不匹配。如何使其工作？

这对我来说适用于您的示例输入：

regexp {D\d+-[A-Z]*PLAYER_(DEF_\d*)_([^_]+)} $str match sub1 sub2

打印匹配组会产生：

% puts "$sub1\n$sub2"
DEF_15
PO

不太确定，但在正则表达式中DEF之后似乎缺少一个

\u

，并且在末尾似乎有额外的

\u

。