Evaluated proc regexp_above pattern {regexp -all -inline {s/(.+?)/(.+?)*/} $pattern}