sample1.pl

#!/usr/bin/perl

# 生物種がhumanのもののヒット数を返す

use SOAP::Lite;

$wsdl = "http://www.ncrna.org/frnadb/doc/soap.wsdl"
$serv = SOAP::Lite
  ->service($wsdl)
  ->outputxml(1);

$query_string = "org=human";

$d = SOAP::Custom::XML::Deserializer->deserialize($serv->search_count($query_string));
if ($d->valueof('//Fault/faultcode')) {
  print "### SOAP FAULT !!!\n";
  print " faultcode:   ", $d->valueof('//Fault/faultcode'), "\n";
  print " faultstring: ", $d->valueof('//Fault/faultstring'), "\n";
  print " detail:      ", $d->valueof('//Fault/detail'), "\n";
} else {
  print "count = ", $d->valueof('//result/count'), "\n";
}

exit(0);

shell> perl sample1.pl
count = 126672

sample2.pl

#!/usr/bin/perl

# 生物種がhumanのもののIDを10件返す

use SOAP::Lite;

$wsdl = "http://www.ncrna.org/frnadb/doc/soap.wsdl"
$serv = SOAP::Lite
  ->service($wsdl)
  ->outputxml(1);

$query_string = "org=human";
$offset = 0;
$limit = 10;

$d = SOAP::Custom::XML::Deserializer->deserialize($serv->search($query_string,$offset,$limit));
if ($d->valueof('//Fault/faultcode')) {
  print "### SOAP FAULT !!!\n";
  print " faultcode:   ", $d->valueof('//Fault/faultcode'), "\n";
  print " faultstring: ", $d->valueof('//Fault/faultstring'), "\n";
  print " detail:      ", $d->valueof('//Fault/detail'), "\n";
} else {
  for $t ($d->valueof('//result/entry_list/entry')) {
    print "entry.id = ", $t->attr->{'id'}, "\n";
  }
}

exit(0);

shell> perl sample2.pl
entry.id = FR000003
entry.id = FR000009
entry.id = FR000010
entry.id = FR000012
entry.id = FR000015
entry.id = FR000020
entry.id = FR000021
entry.id = FR000023
entry.id = FR000026
entry.id = FR000027

sample3.pl

#!/usr/bin/perl

# fRNAdbID:FR000001のdescriptionを返す

use SOAP::Lite;

$wsdl = "http://www.ncrna.org/frnadb/doc/soap.wsdl"
$serv = SOAP::Lite
  ->service($wsdl)
  ->outputxml(1);

$query_string = "FR000001";
$feature = "";
$map_genome = "";

$d = SOAP::Custom::XML::Deserializer->deserialize($serv->entry($query_string,$feature,$map_genome));
if ($d->valueof('//Fault/faultcode')) {
  print "### SOAP FAULT !!!\n";
  print " faultcode:   ", $d->valueof('//Fault/faultcode'), "\n";
  print " faultstring: ", $d->valueof('//Fault/faultstring'), "\n";
  print " detail:      ", $d->valueof('//Fault/detail'), "\n";
} else {
  print "description = ", $d->valueof('//result/entry_list/entry/description'), "\n";
}

exit(0);

shell> perl sample3.pl
description = Group II intron

sample4.pl

#!/usr/bin/perl

# fRNAdbID:FR000003がマップされているゲノムを返す

use SOAP::Lite;

$wsdl = "http://www.ncrna.org/frnadb/doc/soap.wsdl"
$serv = SOAP::Lite
  ->service($wsdl)
  ->outputxml(1);

$query_string = "FR000003";
$genome = "";

$d = SOAP::Custom::XML::Deserializer->deserialize($serv->entry_mapinfo($query_string,$genome));
if ($d->valueof('//Fault/faultcode')) {
  print "### SOAP FAULT !!!\n";
  print " faultcode:   ", $d->valueof('//Fault/faultcode'), "\n";
  print " faultstring: ", $d->valueof('//Fault/faultstring'), "\n";
  print " detail:      ", $d->valueof('//Fault/detail'), "\n";
} else {
  for $t ($d->valueof('//result/entry_list/entry/genome_list/genome')) {
    print "genome.name = ", $t->attr->{'name'}, "\n";
  }
}

exit(0);

shell> perl sample4.pl
genome.name = hg17
genome.name = hg18

sample1.py

#!/usr/bin/python

# 生物種がhumanのもののヒット数を返す

from SOAPpy import WSDL

wsdl = "http://www.ncrna.org/frnadb/doc/soap.wsdl"
serv = WSDL.Proxy(wsdl)
result = serv.search_count(query_string="org=human")

print "count = " + result['count']

shell> python sample1.py
count = 126672

sample2.py

#!/usr/bin/python

# 生物種がhumanのもののIDを10件返す

from SOAPpy import *
from StringIO import StringIO
import sys, xml.parsers.expat

Config.dumpSOAPIn = 1

buf = StringIO()
sys.stdout = buf

wsdl = "http://www.ncrna.org/frnadb/doc/soap.wsdl"
serv = WSDL.Proxy(wsdl)
try:
  result = serv.search(query_string="org=human", offset=0, limit=10)
except:
  sys.stderr.write("Error\n")
else:
  sys.stdout = sys.__stdout__
  buf = buf.getvalue()
  buf = buf.strip()
  lines = buf.split('\n')
  lines = lines[1:-1]

  def start_element(name, attrs):
    if name == 'fs:entry':
      print "entry.id = " + attrs['id']

  p = xml.parsers.expat.ParserCreate()
  p.StartElementHandler  = start_element
  p.Parse(''.join(lines))

shell> python sample2.py
entry.id = FR000003
entry.id = FR000009
entry.id = FR000010
entry.id = FR000012
entry.id = FR000015
entry.id = FR000020
entry.id = FR000021
entry.id = FR000023
entry.id = FR000026
entry.id = FR000027

sample3.py

#!/usr/bin/python

# fRNAdbID:FR000001のdescriptionを返す

from SOAPpy import WSDL

wsdl = "http://www.ncrna.org/frnadb/doc/soap.wsdl"
serv = WSDL.Proxy(wsdl)
result = serv.entry(query_string="FR000001", feature="", map_genome="")

print "description = " + result['entry_list']['entry']['description']

shell> python sample3.py
description = Group II intron

sample4.py

#!/usr/bin/python

# fRNAdbID:FR000003がマップされているゲノムを返す

from SOAPpy import *
from StringIO import StringIO
import sys, xml.parsers.expat

Config.dumpSOAPIn = 1

buf = StringIO()
sys.stdout = buf

wsdl = "http://www.ncrna.org/frnadb/doc/soap.wsdl"
serv = WSDL.Proxy(wsdl)
try:
  result = serv.entry_mapinfo(query_string="FR000003", genome="")
except:
  sys.stderr.write("Error\n")
else:
  sys.stdout = sys.__stdout__
  buf = buf.getvalue()
  buf = buf.strip()
  lines = buf.split('\n')
  lines = lines[1:-1]

  def start_element(name, attrs):
    if name == 'fg:genome':
      print "genome.name = " + attrs['name']

  p = xml.parsers.expat.ParserCreate()
  p.StartElementHandler  = start_element
  p.Parse(''.join(lines))

shell> python sample4.py
genome.name = hg17
genome.name = hg18

sample1.rb

#!/usr/bin/env ruby

# 生物種がhumanのもののヒット数を返す

require 'soap/wsdlDriver'

wsdl = "http://www.ncrna.org/frnadb/doc/soap.wsdl"
serv = SOAP::WSDLDriverFactory.new(wsdl).create_rpc_driver
serv.generate_explicit_type = true

result = serv.search_count(query_string="org=human")
print "count = #{result['count']}\n"

shell> ruby sample1.rb
count = 126672

sample2.rb

#!/usr/bin/env ruby

# 生物種がhumanのもののIDを10件返す

require 'soap/wsdlDriver'

wsdl = "http://www.ncrna.org/frnadb/doc/soap.wsdl"
serv = SOAP::WSDLDriverFactory.new(wsdl).create_rpc_driver
serv.generate_explicit_type = true

result = serv.search(query_string="org=human", offset=0, limit=10)
for entry in result['entry_list']['entry']:
        attr = (entry.__xmlattr).to_a
        print "entry.id = #{attr[0][1]}\n"
end

shell> ruby sample2.rb
entry.id = FR000003
entry.id = FR000009
entry.id = FR000010
entry.id = FR000012
entry.id = FR000015
entry.id = FR000020
entry.id = FR000021
entry.id = FR000023
entry.id = FR000026
entry.id = FR000027

sample3.rb

#!/usr/bin/env ruby

# fRNAdbID:FR000001のdescriptionを返す

require 'soap/wsdlDriver'

wsdl = "http://www.ncrna.org/frnadb/doc/soap.wsdl"
serv = SOAP::WSDLDriverFactory.new(wsdl).create_rpc_driver
serv.generate_explicit_type = true

result = serv.entry(query_string="FR000001", feature="", map_genome="")
desc = result['entry_list']['entry']['description']
print "description = #{desc}\n"

shell> ruby sample3.rb
description = Group II intron

sample4.rb

#!/usr/bin/env ruby

# fRNAdbID:FR000003がマップされているゲノムを返す

require 'soap/wsdlDriver'

wsdl = "http://www.ncrna.org/frnadb/doc/soap.wsdl"
serv = SOAP::WSDLDriverFactory.new(wsdl).create_rpc_driver
serv.generate_explicit_type = true

result = serv.entry_mapinfo(query_string="FR000003", genome="")
for genome in result['entry_list']['entry']['genome_list']['genome']:
        attr = (genome.__xmlattr).to_a
        print "genome.name = #{attr[0][1]}\n"
end

shell> ruby sample4.rb
genome.name = hg17
genome.name = hg18

Apache Axisに含まれる WSDL2Java を使ってクラスファイルを生成することができます。

注意: 文字列がString_Element型になるようですがString型に直してください。

shell> java org.apache.axis.wsdl.WSDL2Java -p frnadb http://www.ncrna.org/frnadb/doc/soap.wsdl

sample1.java

// 生物種がhumanのもののヒット数を返す

import frnadb.*;
import org.apache.axis.types.*;

public class sample1 {

  public static void main(String[] args){
    try {

        FRNAdbServiceLocator  locator  = new FRNAdbServiceLocator();
        FRNAdbPort_PortType   serv     = locator.getfRNAdbPort();

        String query_string      = new String("org=human");
        SearchResult_TYPE result = new SearchResult_TYPE();
        result = serv.search_count(query_string);

        NonNegativeInteger count = result.getCount();
        System.out.printf("count = %d", count);
        System.out.println();

    } catch (Exception e) {
        e.printStackTrace();
    }
  }

}

shell> javac sample1.java
shell> java sample1
count = 126672

sample2.java

// 生物種がhumanのもののIDを10件返す

import frnadb.*;
import org.apache.axis.types.*;

public class sample2 {

  public static void main(String[] args){
    try {

        FRNAdbServiceLocator  locator  = new FRNAdbServiceLocator();
        FRNAdbPort_PortType   serv     = locator.getfRNAdbPort();

        String query_string       = new String("org=human");
        NonNegativeInteger offset = new NonNegativeInteger("0");
        NonNegativeInteger limit  = new NonNegativeInteger("10");
        SearchResult_TYPE result  = new SearchResult_TYPE();
        result = serv.search(query_string, offset, limit);

        SearchEntry_TYPE[] entry_list = result.getEntry_list();
        for(int i=0; i<java.lang.reflect.Array.getLength(entry_list); i++){
                System.out.printf("entry.id = %s", entry_list[i].getId());
                System.out.println();
        }

    } catch (Exception e) {
        e.printStackTrace();
    }
  }

}

shell> javac sample2.java
shell> java sample2
entry.id = FR000003
entry.id = FR000009
entry.id = FR000010
entry.id = FR000012
entry.id = FR000015
entry.id = FR000020
entry.id = FR000021
entry.id = FR000023
entry.id = FR000026
entry.id = FR000027

sample3.java

// fRNAdbID:FR000001のdescriptionを返す

import frnadb.*;
import org.apache.axis.types.*;

public class sample3 {

  public static void main(String[] args){
    try {

        FRNAdbServiceLocator  locator  = new FRNAdbServiceLocator();
        FRNAdbPort_PortType   serv     = locator.getfRNAdbPort();

        String query_string     = new String("FR000001");
        String feature          = new String("");
        String map_genome       = new String("");
        EntryResult_TYPE result = new EntryResult_TYPE();
        result = serv.entry(query_string, feature, map_genome);

        Entry_TYPE[] entry_list = result.getEntry_list();
        String description = entry_list[0].getDescription();
        System.out.printf("description = %s", description);
        System.out.println();

    } catch (Exception e) {
        e.printStackTrace();
    }
  }

}

shell> javac sample3.java
shell> java sample3
description = Group II intron

sample4.java

// fRNAdbID:FR000003がマップされているゲノムを返す

import frnadb.*;
import org.apache.axis.types.*;

public class sample4 {

  public static void main(String[] args){
    try {

        FRNAdbServiceLocator  locator  = new FRNAdbServiceLocator();
        FRNAdbPort_PortType   serv     = locator.getfRNAdbPort();

        String query_string      = new String("FR000003");
        String genome            = new String("");
        GenomeResult_TYPE result = new GenomeResult_TYPE();
        result = serv.entry_mapinfo(query_string, genome);

        GenomeEntry_TYPE[] entry_list = result.getEntry_list();
        Genome_TYPE[] genome_list     = entry_list[0].getGenome_list();
        for(int i=0; i<java.lang.reflect.Array.getLength(genome_list); i++){
                System.out.printf("genome.name = %s", genome_list[i].getName());
                System.out.println();
        }

    } catch (Exception e) {
        e.printStackTrace();
    }
  }

}

>shell javac sample4.java
>shell java sample4
genome.name = hg17
genome.name = hg18