root/docs/cho45/20080622-rubykaigi-subsession-net-irc/t.rb

#!/usr/bin/env ruby



require "rubygems"
require "hparser"

require "pp"

require 'hparser/block/pair'
require 'hparser/block/collectable'

class HParser::Block::Comment < HParser::Parser::Pair
        include HParser::Parser::Collectable

        def self.parse(scanner, inlines)
                content = get(scanner, '><!--', '--><')
                if content then
                        self.new content
                end
        end

        def self.<=>(o)
                -1
        end

        def to_html
                ""
        end
end

parsed =  HParser::Parser.new.parse(File.read(__FILE__)[/__END__\n([\s\S]+)/, 1])

pp parsed

puts parsed.map{|i| i.to_html }
#
#sections = parsed.inject([[]]) do |r,element|
#       element.instance_variable_set(:@level, element.level + 1) if element.kind_of?(HParser::Block::Head)
#       if element.kind_of?(HParser::Block::Head) && element.level == 2
#               r << [element]
#       else
#               r.last << element
#       end
#       r
#end

__END__

* Agenda

+ Introducing to net-irc
+ About the DSL (or something DSL-ish)
+ Applications using net-irc

><!--
aaa
--><

* Fo

aaaa