Bio::Das

Interface to Distributed Annotation System
Download

Bio::Das Ranking & Summary

Advertisement

  • Rating:
  • License:
  • Perl Artistic License
  • Price:
  • FREE
  • Publisher Name:
  • Lincoln D. Stein
  • Publisher web site:
  • http://search.cpan.org/~lds/

Bio::Das Tags


Bio::Das Description

Interface to Distributed Annotation System Bio::Das is a Perl module that provides access to genome sequencing and annotation databases that export their data in Distributed Annotation System (DAS) format version 1.5. This system is described at http://biodas.org. Both unencrypted (http:) and SSL-encrypted (https:) DAS servers are supported. (To run SSL, you will need IO::Socket::SSL and Net::SSLeay installed).SYNOPSIS use Bio::Das; # SERIAL API my $das = Bio::Das->new(-source => 'http://www.wormbase.org/db/das', -dsn => 'elegans', -aggregators => ); my $segment = $das->segment('Chr1'); my @features = $segment->features; my $dna = $segment->dna; # PARALLEL API # create a new DAS agent with a timeout of 5 sec my $das = Bio::Das->new(5); # fetch features from wormbase live and development servers spanning two segments on chromosome I my @request = $das->features(-dsn => , -segment => ); for my $request (@request) { if ($request->is_success) { print " Response from ",$request->dsn," "; my $results = $request->results; for my $segment (keys %$results) { my @features = @{$results->{$segment}}; print " ",join ' ',$segment,@features," "; } } else { #error warn $request->dsn,": ",$request->error," "; } } # Same thing, but using a callback: $das->features(-dsn => , -segment => , -callback => sub { my $feature = shift; my $segment = $feature->segment; my ($start,$end) = ($feature->start,$feature->end); print "$segment => $feature ($start,$end) "; } ); Requirements: · Perl


Bio::Das Related Software