我正在编写一个脚本来将日志文件分类为更方便的数据,为此我使用any()函数。我现在知道字符串的一部分是否与我列表中的任何项目匹配。这是功能:
% render solutions nicely.
:- use_rendering(sudoku).
:- use_module(library(clpfd)).
% Example by Markus Triska, taken from the SWI-Prolog manual.
sudoku(Rows) :-
length(Rows, 9), maplist(same_length(Rows), Rows),
append(Rows, Vs), Vs ins 1..9,
maplist(all_distinct, Rows),
transpose(Rows, Columns),
maplist(all_distinct, Columns),
Rows = [A,B,C,D,E,F,G,H,I],
blocks(A, B, C), blocks(D, E, F), blocks(G, H, I).
blocks([], [], []).
blocks([A,B,C|Bs1], [D,E,F|Bs2], [G,H,I|Bs3]) :-
all_distinct([A,B,C,D,E,F,G,H,I]),
blocks(Bs1, Bs2, Bs3).
problem(1, [[_,_,_, _,_,_, _,_,_],
[_,_,_, _,_,3, _,8,5],
[_,_,1, _,2,_, _,_,_],
[_,_,_, 5,_,7, _,_,_],
[_,_,4, _,_,_, 1,_,_],
[_,9,_, _,_,_, _,_,_],
[5,_,_, _,_,_, _,7,3],
[_,_,2, _,1,_, _,_,_],
[_,_,_, _,4,_, _,_,9]]).
/** <examples>
?- problem(1, Rows), sudoku(Rows).
*/
这将告诉我字符串i的一部分是否与我的列表中的任何项目相匹配。但是,有没有办法检测哪个项目匹配?我还没有找到任何()这样做的内置方式,并且不认为有一个如此,那么如何解决这个问题呢?这个特定的片段比我之前使用的方法(基本上是一个简单的循环)要快得多,所以我宁愿继续使用它。
谢谢!
答案 0 :(得分:2)
通过使用any
,您将在语义上丢弃返回值。你不关心哪一个,你只关心它们any
是否正确。
我建议使用显式for。它更清晰,并通过异常处理消除了模糊的next()的复杂性。表现是一样的:
for search in look_for:
if search in i:
break
else:
print('Not found...')
答案 1 :(得分:1)
您可以使用next((search for search in look_for if (search in i)), None)
获取第一个匹配元素。它仍然是短路的,所以它会在找到匹配后停止搜索。如果未找到匹配项,则返回第二个参数。