List filter

[antistar]

I have the following list:

("AND" "CNF" "SND" "X1P"... "X2P" "Y3N"... "Z1P"...)

I would like to get a list of all elements that start with the letters X and Y.
return:

("X1P"... "X2P" "Y3N"...)

Any help will be appreciated.

Thank in advance.

[BlackBox]

I have the following list:
("AND" "CNF" "SND" "X1P"... "X2P" "Y3N"... "Z1P"...)

I would like to get a list of all elements that start with the letters X and Y.
return:
("X1P"... "X2P" "Y3N"...)

Any help will be appreciated.

Thank in advance.

(vl-load-com)

(defun _RemoveIfNot (match lst)
  ;; Example:
  ;; (_RemoveIfNot "X*,Y*" '("AND" "CNF" "SND" "X1P" "X2P" "Y3N" "Z1P"))
  (vl-remove-if-not (function (lambda (x) (wcmatch x match))) lst)
)

[antistar]

Hi BlackBox,
Excellent!!! You saved my date.
Thanks for your attention and sharing your knowledge.

Cheers.

[BlackBox]

Hi BlackBox,
Excellent!!! You saved my date.
Thanks for your attention and for sharing their knowledge.

Cheers.

That is kind of you to say, antistar; I'm happy to help.

Cheers