{ path = $1; sub(/[?].*$/, "", path)
  if (!(path in seen)) { seen[path] = 1; order[++n] = path }
  count[path]++
}
END { for (i = 1; i <= n; i++) print order[i], count[order[i]] }