Using s/string/string/ to replace things in strings… YAY RUBY!

replacer.rb

class Proc
  alias :/ :call
end

def s
  optmap = {
    "x" => Regexp::EXTENDED,
    "i" => Regexp::IGNORECASE,
    "m" => Regexp::MULTILINE
  }

  lambda do |find, replace, flags|
    flags = flags.to_s

    options = 0
    flags.scan(Regexp.union(optmap.keys)) do |x|
      options |= optmap[x]
    end

    find = Regexp.new(find, options)
    meth = flags[/g/].to_s << "sub"

    lambda { |string| string.public_send(meth, find, replace) }
  end.curry
end

# a variant of S that does not take flags
S = lambda { |find, replace| s[find, replace, ""] }.curry

puts (s/"Hello"/"hi"/:gi)["Hello hello world"]
puts (S/"Hello"/"hi")["Hello hello world"]