musing on intarwebz

  # create a new article instance
  article =  Academia::Article.new("Wanting to play around with ruby DSL")

  # authors
  article.authors = [
    Author.new("Marge Simpson"), 
    Author.new("Bart Simpson"), 
    Author.new("Lisa Simpson"), 
    Author.new("Margaret Simpson"),
    Author.new("Homer Simpson")
  ]

  # journal
  journal = Journal.new
  journal.name = "Springfield Scientific"
  journal.volume = 20
  journal.issue = 3
  article.journal = journal

  # article abstract
  article.abstract = %(Still doing things the old-fashioned way.)

  # article content
  article.content  = %(Lorem ipsum dolor sit amet, consectetur adipisicing elit, 
    sed do eiusmod tempor incididunt ut labore et dolore magna aliqua. 
    Ut enim ad minim veniam, quis nostrud exercitation ullamco laboris 
    nisi ut aliquip ex ea commodo consequat. Duis aute irure dolor in 
    reprehenderit in voluptate velit esse cillum dolore eu fugiat nulla 
    pariatur. Excepteur sint occaecat cupidatat non proident, sunt in 
    culpa qui officia deserunt mollit anim id est laborum.
  )

  article = Academia::Article.create "Writing a DSL for academia" do
    author    "Marge Simpson"
    author    "Bart Simpson"
    author    "Lisa Simpson"  
    author    "Margaret Simpson"
    author    "Homer Simpson"
    journal   {
                name "Springfield Scientific"
                volume 20
                issue 3
              }    
    abstract  %(Gimme somma that syntactic sugar!!)
    content   %(Lorem ipsum dolor sit amet, consectetur adipisicing elit, 
                sed do eiusmod tempor incididunt ut labore et dolore magna aliqua. 
                Ut enim ad minim veniam, quis nostrud exercitation ullamco laboris 
                nisi ut aliquip ex ea commodo consequat. Duis aute irure dolor in 
                reprehenderit in voluptate velit esse cillum dolore eu fugiat nulla 
                pariatur. Excepteur sint occaecat cupidatat non proident, sunt in 
                culpa qui officia deserunt mollit anim id est laborum.)
  end        

  module Academia
    class Person
      attr_accessor :name
      def initialize(name)
        @name = name
      end
    end

    class Author < Person
      def initialize(name)
        super
      end
    end
  end

      
  module Academia
    class Journal
      attr_accessor :journal_name, :volume_number, :issue_number

      def name(journal_name)
        @journal_name = journal_name
      end

      def volume(volume_number)
        @volume_number = volume_number
      end

      def issue(issue_number)
        @issue_number = issue_number
      end

      def to_s
        s = "\tJournal - #{@journal_name}\n"
        s += "\t\tVolume - #{@volume_number}, Issue - #{@issue_number}\n"
      end
    end
  end

  module Academia
    class Article
    
      attr_accessor :title, :authors, :journal, :abstract_content, :article_content
    
      # constructor
      def initialize(title)
        @title = title 
        @authors = [] 
        @journal = nil
        @abstract_content = "" 
        @article_content = ""
      end

      # the dsl magic kicking off here below
      def self.create(title, &block)
        article = Article.new(title)
        article.instance_eval(&block)
        article
      end
      
      # a dsl method to store the authors  
      def author(author_name)
        @authors << Author.new(author_name)
      end

      # a dsl method to create the journal instance
      def journal(&block)
        @journal = Journal.new
        @journal.instance_eval(&block)
      end
    
      # a dsl method to store the abstract text
      def abstract(abstract_content)
        @abstract_content = abstract_content      
      end

      # a dsl method to store the article text
      def content(article_content)
        @article_content = article_content.gsub(/\s+/," ")
      end

      # a handy utility method to print out the article details
      def to_s
        s = "Article\n\tTitle - #{@title}\n"
        s += "\tAuthors -\n"
        @authors.each_with_index do |author, i|
          s += "\t\t#{i+1}: #{author.name}\n"
        end
        s += @journal.to_s
        s += "\tAbstract -\n\t\t#{@abstract_content}\n"
        s += "\tContent  -\n\t\t#{@article_content}"
      end
          
    end
  end