NAME

Bio::Phylo::PhyloWS::Client - Base class for phylogenetic web service clients

SYNOPSIS

 #!/usr/bin/perl
 use strict;
 use warnings;
 use Bio::Phylo::Factory;
 
 my $fac = Bio::Phylo::Factory->new;
 my $client = $fac->create_client( '-url' => 'http://8ball.sdsc.edu:6666/treebase-web/phylows/' );
 my $desc = $client->get_query_result( 
        '-query'        => 'dcterms.identifier=S2484', 
        '-section'      => 'study',
        '-recordSchema' => 'tree',
 );
 for my $res ( @{ $desc->get_entities } ) {
        my $proj = $client->get_record( '-guid' => $res->get_guid );
        print $proj->to_nexus, "\n";
 }

DESCRIPTION

This is the base class for clients connecting to services that implement the PhyloWS (http://evoinfo.nescent.org/PhyloWS) recommendations.

METHODS

CONSTRUCTOR

new()

 Type    : Constructor
 Title   : new
 Usage   : my $phylows = Bio::Phylo::PhyloWS::Client->new( -url => $url );
 Function: Instantiates Bio::Phylo::PhyloWS::Client object
 Returns : a Bio::Phylo::PhyloWS::Client object 
 Args    : Required: -url => $url
           Optional: any number of setters. For example,
                   Bio::Phylo::PhyloWS->new( -name => $name )
                   will call set_name( $name ) internally

ACCESSORS

get_query_result()

Gets search query result

 Type    : Accessor
 Title   : get_query_result
 Usage   : my $res = $obj->get_query_result( -query => $query );
 Function: Returns Bio::Phylo::PhyloWS::Description object
 Returns : A string
 Args    : Required: -query => $cql_query
           Optional: -format, -section, -recordSchema

get_record()

Gets a PhyloWS database record

 Type    : Accessor
 Title   : get_record
 Usage   : my $rec = $obj->get_record( -guid => $guid );
 Function: Gets a PhyloWS database record
 Returns : Bio::Phylo::Project object
 Args    : Required: -guid => $guid
           Optional: -format (default: nexml)

SEE ALSO

Also see the manual: Bio::Phylo::Manual and http://rutgervos.blogspot.com

REVISION

 $Id: Phylo.pm 1045 2009-05-28 22:48:16Z rvos $