4つの数と四則と括弧

問題：https://codeiq.jp/ace/nabetani_takenori/q820

括弧を付けるのを許容するならyield解法が使えるので、短く書けます。
一応Ruby 1.8/1.9両対応です。1.8だとRational(rational,rational)が定義されていないので工夫が必要でした。

codeiq820.rb

#!/usr/bin/ruby
#derived from AOJ 0041
require 'rational'

class String
    def integer?
        Integer(self)!=nil rescue false
    end
end

def dfs(a,&block)
    return to_enum(:dfs,a) if !block_given?
    yield [a[0],a[0].to_s] if a.size<2
    (a.size-1).times{|i|
        dfs(a[0..i]){|l|
            dfs(a[i+1..-1]){|r|
                yield [l[0]+r[0],%Q((#{l[1]} + #{r[1]}))]
                yield [l[0]-r[0],%Q((#{l[1]} - #{r[1]}))]
                yield [l[0]*r[0],%Q((#{l[1]} * #{r[1]}))]
                yield [l[0].is_a?(Rational) || r[0].is_a?(Rational) ? l[0]/r[0] : Rational(l[0],r[0]),%Q((#{l[1]} / #{r[1]}))]
                yield ["#{l[0]}#{r[0]}".to_i,%Q(#{l[1]}#{r[1]})] if l[1].integer? and r[1].integer?
            }
        }
    }
end

h={}
[2,3,7,8].permutation{|e|
    dfs(e){|f|
        n=f[0]
        n=f[0].numerator if f[0].denominator==1
        if n.is_a?(Integer) && 1<=n && n<=99
            h[n]=true
        end
    }
}
puts [*1..99].reject{|e|h.has_key?(e)}*',' # 54,59,71,76,80,85,94,95