↓はどう？定数の優先度で無理矢理回避してるんだけど…

require 'uri'

module URI
  ABS_URI = Regexp.new(REGEXP::ABS_URI.to_s.gsub(/-a-zA-Z\\d/, '-_a-zA-Z\d'))
  REL_URI = Regexp.new(REGEXP::REL_URI.to_s.gsub(/-a-zA-Z\\d/, '-_a-zA-Z\d'))
end

u = URI::parse('http://shacho_soft.at.infoseek.co.jp/diablo_calc/calc.html')
puts u.host