Pastable version of String#to_proc (by Reginald Braithwaite)

<div style="overflow:auto;border:solid 1px #ccc;background:#000;color:#F8F8F8">
 <div class="section">
 
 <pre style="float:left;margin:0 10px;border-right:0;color:#666;">1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67</pre>
 <pre class="sunburst"># String#to_proc
#
# See http://weblog.raganwald.com/2007/10/stringtoproc.html ( Subscribe in a reader)
#
# Ported from the String Lambdas in Oliver Steele's Functional Javascript
# http://osteele.com/sources/javascript/functional/
#
# This work is licensed under the MIT License:
#
# (c) 2007 Reginald Braithwaite
# Portions Copyright (c) 2006 Oliver Steele
# 
# Permission is hereby granted, free of charge, to any person obtaining
# a copy of this software and associated documentation files (the
# &quot;Software&quot;), to deal in the Software without restriction, including
# without limitation the rights to use, copy, modify, merge, publish,
# distribute, sublicense, and/or sell copies of the Software, and to
# permit persons to whom the Software is furnished to do so, subject to
# the following conditions:
# 
# The above copyright notice and this permission notice shall be
# included in all copies or substantial portions of the Software.
# 
# THE SOFTWARE IS PROVIDED &quot;AS IS&quot;, WITHOUT WARRANTY OF ANY KIND,
# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

class String
 unless ''.respond_to?(:to_proc)
 def to_proc &amp;block
 params = []
 expr = self
 sections = expr.split(/\s*-&gt;\s*/m)
 if sections.length &gt; 1 then
 eval sections.reverse!.inject { |e, p| &quot;(Proc.new { |#{p.split(/\s/).join(', ')}| #{e} })&quot; }, block &amp;&amp; block.binding
 elsif expr.match(/\b_\b/)
 eval &quot;Proc.new { |_| #{expr} }&quot;, block &amp;&amp; block.binding
 else
 leftSection = expr.match(/^\s*(?:[+*\/%&amp;|\^\.=&lt;&gt;\[]|!=)/m)
 rightSection = expr.match(/[+\-*\/%&amp;|\^\.=&lt;&gt;!]\s*$/m)
 if leftSection || rightSection then
 if (leftSection) then
 params.push('$left')
 expr = '$left' + expr
 end
 if (rightSection) then
 params.push('$right')
 expr = expr + '$right'
 end
 else
 self.gsub(
 /(?:\b[A-Z]|\.[a-zA-Z_$])[a-zA-Z_$\d]*|[a-zA-Z_$][a-zA-Z_$\d]*:|self|arguments|'(?:[^'\\]|\\.)*'|&quot;(?:[^&quot;\\]|\\.)*&quot;/, ''
 ).scan(
 /([a-z_$][a-z_$\d]*)/i
 ) do |v| 
 params.push(v) unless params.include?(v)
 end
 end
 eval &quot;Proc.new { |#{params.join(', ')}| #{expr} }&quot;, block &amp;&amp; block.binding
 end
 end
 end
end
</pre>
 </div>
 </div>

Refactor :my => 'code'

Recent

Popular

Pastable version of String#to_proc (by Reginald Braithwaite)