Bio-DB-BioFetch

 view release on metacpan or  search on metacpan

META.json  view on Meta::CPAN

            "Test::More" : "0.88",
            "Test::Pod" : "1.41",
            "Test::Pod::Coverage" : "1.08"
         }
      },
      "runtime" : {
         "requires" : {
            "Bio::DB::WebDBSeqI" : "0",
            "Bio::Root::Root" : "0",
            "Carp" : "0",
            "HTTP::Request::Common" : "0",
            "base" : "0",
            "constant" : "0",
            "strict" : "0",
            "vars" : "0"
         }
      },
      "test" : {
         "requires" : {
            "Data::Stag" : "0",
            "File::Spec" : "0",

META.yml  view on Meta::CPAN

generated_by: 'Dist::Zilla version 6.012, CPAN::Meta::Converter version 2.150005'
license: perl
meta-spec:
  url: http://module-build.sourceforge.net/META-spec-v1.4.html
  version: '1.4'
name: Bio-DB-BioFetch
requires:
  Bio::DB::WebDBSeqI: '0'
  Bio::Root::Root: '0'
  Carp: '0'
  HTTP::Request::Common: '0'
  base: '0'
  constant: '0'
  strict: '0'
  vars: '0'
resources:
  bugtracker: https://github.com/bioperl/bio-db-biofetch/issues
  homepage: https://metacpan.org/release/Bio-DB-BioFetch
  repository: git://github.com/bioperl/bio-db-biofetch.git
version: 1.7.3
x_Dist_Zilla:

Makefile.PL  view on Meta::CPAN

    "ExtUtils::MakeMaker" => 0
  },
  "DISTNAME" => "Bio-DB-BioFetch",
  "LICENSE" => "perl",
  "MIN_PERL_VERSION" => "5.006",
  "NAME" => "Bio::DB::BioFetch",
  "PREREQ_PM" => {
    "Bio::DB::WebDBSeqI" => 0,
    "Bio::Root::Root" => 0,
    "Carp" => 0,
    "HTTP::Request::Common" => 0,
    "base" => 0,
    "constant" => 0,
    "strict" => 0,
    "vars" => 0
  },
  "TEST_REQUIRES" => {
    "Data::Stag" => 0,
    "File::Spec" => 0,
    "IO::Handle" => 0,
    "IPC::Open3" => 0,

Makefile.PL  view on Meta::CPAN

  }
);


my %FallbackPrereqs = (
  "Bio::DB::WebDBSeqI" => 0,
  "Bio::Root::Root" => 0,
  "Carp" => 0,
  "Data::Stag" => 0,
  "File::Spec" => 0,
  "HTTP::Request::Common" => 0,
  "IO::Handle" => 0,
  "IPC::Open3" => 0,
  "Test::Exception" => 0,
  "Test::More" => 0,
  "Test::RequiresInternet" => 0,
  "Test::Warn" => 0,
  "base" => 0,
  "constant" => 0,
  "strict" => 0,
  "vars" => 0,

lib/Bio/DB/BioFetch.pm  view on Meta::CPAN

#
# POD documentation - main docs before the code
#

package Bio::DB::BioFetch;
$Bio::DB::BioFetch::VERSION = '1.7.3';
use strict;

use Carp;

use HTTP::Request::Common 'POST';

=head1 NAME

Bio::DB::BioFetch - Database object interface to BioFetch retrieval

=head1 SYNOPSIS

 use Bio::DB::BioFetch;

 $bf = Bio::DB::BioFetch->new();

lib/Bio/DB/BioFetch.pm  view on Meta::CPAN

=cut

*get_Stream_by_batch = \&Bio::DB::WebDBSeqI::get_Stream_by_id;

=head1 The remainder of these methods are for internal use

=head2 get_request

 Title   : get_request
 Usage   : my $url = $self->get_request
 Function: returns a HTTP::Request object
 Returns :
 Args    : %qualifiers = a hash of qualifiers (ids, format, etc)

=cut


sub get_request {
    my ($self, @qualifiers) = @_;
    my ($uids, $format) = $self->_rearrange([qw(UIDS FORMAT)],
					    @qualifiers);