vacount.vim

let altnames = {
      \ 'ujm'     : 'ujihisa',
      \ 'tyru1'   : 'tyru',
      \ 'momonga' : 'supermomonga'
      \ }
let source = {}
let no = 33746
let url = printf('http://atnd.org/events/%d', no)
let dom = webapi#html#parseURL(url)
for tr in dom.find('table').childNodes('tr')
  unlet! tds
  unlet! name
  let tds = tr.childNodes('td')
  if len(tds) == 4
    let name = tds[2].value()[1:-1]
    if name != ''
      if has_key(altnames, name)
        let name = altnames[name]
      endif
      let source[name] = has_key(source, name) ? source[name] + 1 : 1
    endif
  endif
endfor
echo source