求助一个正则表达式的写法

Lisphk

我要写的代码，希望判断是完整的字符串输入才匹配，局部符合不匹配
比如： (xd::string:regexps "a" "c abc")  这样写，只要有a就匹配，如何才能做必须输入abc才匹配abc呢，输入a ,ab,bc 都不匹配。a b c是一个一个输入的，不希望输入a了，就找到abc.
谢谢！

st788796

wcmatch 不行?

Lisphk

st788796 发表于 2017-8-29 22:03

wcmatch 怎么写，大师

newer

你要是一个一个输入，然后判断完整的是否在字符串表里，可以用到正则表达式的单词边界 //b

测试下

命令: (xd::string:regexps "a\\b" "c abc" "")
nil

命令: (xd::string:regexps "ab\\b" "c abc" "")
nil

命令: (xd::string:regexps "abc\\b" "c abc" "")
("abc")

csharp

[ 本帖最后由 csharp 于 2017-8-30 11:12 编辑 ]\n\n[ 本帖最后由 csharp 于 2017-8-30 11:11 编辑 ] (wcmatch "a" "*[a][b]c*")
nil
(wcmatch "ab" "*[a][b]c*")
nil
(wcmatch "abc" "*[a][b]c*")
T

fools

没搞懂实际需求是什么，如果只是匹配abc，用equal不是更简单
_$ (equal "a" "abc")
nil
_$ (equal "ab" "abc")
nil
_$ (equal "abc" "abc")
T

Lisphk

csharp 发表于 2017-8-30 11:09

谢谢，我试试。

Lisphk

fools 发表于 2017-8-30 11:54

是这样的，
我要循环从键盘读字符，组合成字符串，
比如先输入A，我判断是否在我的预设的字符串里面，没有，再输入B，直到输入ABC

fools

lisphk，看你的描述，相当于直接匹配abc。还是说除了匹配abc，还要匹配单独字母c？其实用member函数也是能实现的。也许是我想简单了，不太清楚你真正的用途，是因为你要匹配的字符串很长吗？

Lisphk

fools 发表于 2017-8-30 12:18

感谢回复，字符串是可变的，比如关键字，用空格分开
"... a bc def ...." , 我输入d或者de的时候，是不希望得到def的，只有完全输入了def,才匹配。

fools

用wcmatch是可行的，感觉用member可能更接近你的需求
(car (member (strcase str) '("A" "BC" "DEF")))

Lisphk

fools 发表于 2017-8-30 12:45

用表存储是一个方案，但有局限性，不如正则表达式灵活，比如以后我想改了，输入a也得到abc的时候，如果用表，还要去修改代码，而正则表达式只改下匹配字符串就行了。

用N版的方法
(xd::string:regexps "a\\b" "c def abc" "")
如果想输入a就得到abc, 就去掉\\b就行了
(xd::string:regexps "a" "c def abc" "")

甚至，判断大小写，输入 B 也得到aBc 命令: (xd::string:regexps "[a-zA-Z]?b[a-zA-Z]?" "c def aBc" "i")
nil
命令: (xd::string:regexps "[a-zA-Z]?B[a-zA-Z]?" "c def aBc" "i")
("aBc")


这些，如果用表的方案，代码会很难维护，要改就改很多。正则就容易多了。

谢谢N版，代码可以用。

WhoCanSay

还是Newer版主猜的功夫高呀！Lisphk把程序贴出来多好，免得大家猜测了。