Answer to Best of Ruby Quiz quiz 03 version 2

最新推荐文章于 2024-04-14 17:39:13 发布

原创最新推荐文章于 2024-04-14 17:39:13 发布 · 134 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#Ruby #XML

-- 差距很大，前一版本有很多冗余逻辑


#! /usr/bin/ruby
require ' rexml/document '
doc = REXML::Document.new "<gedcom/>"
stack = [doc.root]
ARGF.each_line do |line|
  next if line =~ /^\s*$/
  # parse line
  line =~ /^\s*([0-9]+)\s+(@\S+@|\S+)(\s(.*))?$/ or raise "Invalid GEDCOM"
  level = $1.to_i
  tag = $2
  data = $4
  # pop off the stack until we get the parent
  while (level+1) < stack.size
    stack.pop
  end
  parent = stack.last
  # create XML tag
  if tag =~ /@.+@/
    el = parent.add_element data
    el.attributes[ ' id ' ] = tag
  else
    el = parent.add_element tag
    el.text = data
  end
  stack.push el
end
doc.write($stdout,0)
puts