ClassModule

class_module.rb

module ClassModule

#all successors excluding self
def successors(klass=self.name.to_s)
  descendants = []
  begin
    ObjectSpace.each_object(class << eval(klass);self;end) do |found|
      descendants << found
    end
  rescue Exception=>e
    descendants << klass
  end
  #return successors exclude class itself
  descendants.reject{|x| x.to_s == klass.to_s}
end

#just proximate successors
def subclasses(klass=self.name.to_s)
  successors(klass).select{|x| eval(klass).to_s == x.superclass.to_s}
end

end