2023-07-01 11:58:00 -04:00
|
|
|
; matching:
|
2026-04-30 12:34:36 -04:00
|
|
|
(print (m/aa(bb|cc)dd/ "aabbddx")) ; => true
|
|
|
|
|
(print (m/aa(bb|cc)dd/ "aaccddx")) ; => true
|
|
|
|
|
(print (m/aa(bb|cc)dd/ "aabcddx")) ; => false
|
2023-07-01 11:58:00 -04:00
|
|
|
|
|
|
|
|
; substitute part of a string:
|
2026-04-30 12:34:36 -04:00
|
|
|
(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
|
