#!/usr/bin/env ruby
require 'soap/driver'

servicetype= 'http://rdfweb.org/RDF/RDFWeb/SOAPDemo'
server = 'http://127.0.0.1:8082/'
#server = 'http://swada.w3.org:8082/' # ssh tunnel'd to my machine
query = 'SELECT ?x, ?y WHERE (dc::title  ?x ?y) USING dc for http://purl.org/dc/elements/1.1/'
ql = 'http://www.w3.org/2002/04/squish-ql#v0.9'
db='codepict'

action=servicetype+'#squish'
rdfweb = SOAP::Driver.new( nil, 'squish', servicetype, server, nil )
rdfweb.setWireDumpDev('_askruby.log')
rdfweb.addMethodWithSOAPAction('squish', action, 'query','ql','db' )

results = rdfweb.squish(query, ql, db)

#puts results.inspect

results.each do |row|
  row.each_key do |field|
    puts "#{field}: #{row[field]}"
  end 
  puts "\n"
end