gistfile1.rb

# -*- encoding: utf-8 -*-
require "rexml/document"
doc = nil
filename = ARGV[0]
if ARGV.size == 0
  puts "usage: ruby title.rb projects.xml"
  exit
end

File.open(filename) {|fp|
    doc = REXML::Document.new fp
}

h = Hash.new
h.default = 0

i = 0
doc.root.elements.each {|e|
  t = REXML::XPath.first(e,"title")
  next if t == nil
  if t.text =~ /.*\p{Hiragana}(.*)$/
    h[$1] = h[$1] + 1
  end
}

h.to_a.sort{|a,b| (a[1] <=> b[1])}.each{|a|
    puts "#{a[0]} #{a[1]}"
}