RosettaCodeData/Task/Regular-expressions/Ol/regular-expressions.ol
2026-04-30 12:34:36 -04:00

9 lines
343 B
Text

; matching:
(print (m/aa(bb|cc)dd/ "aabbddx")) ; => true
(print (m/aa(bb|cc)dd/ "aaccddx")) ; => true
(print (m/aa(bb|cc)dd/ "aabcddx")) ; => false
; substitute part of a string:
(print (s/aa(bb|cc)dd/HAHAHA/ "aabbddx")) ; => HAHAHAx
(print (s/aa(bb|cc)dd/HAHAHA/ "aaccddx")) ; => HAHAHAx
(print (s/aa(bb|cc)dd/HAHAHA/ "aabcddx")) ; => false