extensible and reusable replacement functions

Run replacement with your preferred content types e.g. Data.Text (implemented),

from search results with non-PCRE regex or non-regex libs

how to use:

value replacement:

>>> replace (Just [(4,3)::PosLen]) "4567" ("abc 123 def"::Text)

"abc 4567 def"

GroupReplacer : replace with a function

replacer::GroupReplacer Text
replacer = defaultReplacer 1 tweak1        --  1: group 1 match. 
          where tweak1 str1 = case str1 of
                                "123" -> "[1-2-3]"
                                otherwise -> traceShow str1 "?"

>>> replace (Just ([(4,3)]::[PosLen])) replacer ("abc 123 def"::Text)

"abc [1-2-3] def"