Truncate only text

tr.rb

def truncateOnlyText t, p
  r = %r{<[^<]+>[^<]+</[^<]+>}
  h = %r{<[^<]+>}
  k = /(?<=>).+(?=<)/
  z = []
  s = t.gsub(h, '')[0,p]
  t.scan(r) do |c|
    z << [c, $~.offset(0)[0]]
  end
  p z
  z.take_while{ |m| s.index(m[0].match(k)[0]) }.each do |m|
  	s.sub!(m[0].match(k)[0], m[0])
  end
  s
end

p truncateOnlyText "Welcome to the <a href=\"/hotels\">hotel</a> California.", 20