Regular expressions: Difference between revisions

Content added Content deleted
No edit summary
Line 551:
(progn
(insert (format "%s found in: %s\n" word str) )
(setq regex (format "^.*+%s" word) )
(setq str (replace-regexp-in-string regex (format "left %s" word) str) )
(setq regex (format "%s.*+$" word) )
(setq str (replace-regexp-in-string regex (format "%s right" word) str) )
(insert (format "result: %s\n" str) ))