(define regex:replace-all (lambda (str replace with) (if (regex:match? str replace) (regex:replace-all (regex:replace str replace with) replace with) str)))