Überprüfen Sie die Anwesenheit eines Strings (oder eines Teils davon) aus einer Liste...

[x11start]

Ich habe eine Liste von Elementen:

(Setq-Liste '("light picket" "pilastro" "tegolo b12" "tegolo b14" "thermal cut panel" "standard panel")

Ich möchte die Anwesenheit eines Strings überprüfen (oder Teil davon); so kann ich nicht Mitglied verwenden, aber ich nehme an, es sollte auch "Diskusse" wcmatch.

Zum Beispiel müsste ich wahr sein, wenn ich frage, ob ich in der obigen Liste nach "*cut*" suche.

es wäre gut, dass man auch "ausziehen" die volle Saite: Ich suche nach "*cut*" und gibt mir '("thermal cut Cooker") zurück, oder ich suche nach "*tegolo*" und erhalte eine Liste: "("tegolo b12" "tegolo b14"). ...

Danke.

 

[dieva]

Es ist nicht sehr elegant. .

(Defun findet es)
(Fortsetzung)
(falls) (wcmatch v (strcat "*" s "*" )
(Fortsetzung)
)
)
Raus!
)
---------------------------------------------------------------------------------------------------------------
(Setq-Liste '("light picket" "pilastro" "tegolo b12" "tegolo b14" "thermal cut panel" "standard panel")
(find "teg" list) --> ("tegolo b14" "tegolo b12")

 

[x11start]

Toll! nichts außer "leeky"!
Ich versuchte auch, Foreach zu verwenden... aber ohne Erfolg: die Alternative, die ich dachte, war, einen Zyklus mit der Zeit zu machen und die Strings nach einem zu überprüfen.