Bio::DB::Flat::BDB embl
SummaryIncluded librariesPackage variablesSynopsisDescriptionGeneral documentationMethods
Toolbar
WebCvsRaw content
Summary
Bio::DB::Flat::BDB::embl - embl adaptor for Open-bio standard BDB-indexed flat file
Package variables
No package variables defined.
Included modules
Bio::DB::Flat::BDB
Inherit
Bio::DB::Flat::BDB
Synopsis
See Bio::DB::Flat.
Description
This module allows embl files to be stored in Berkeley DB flat files
using the Open-Bio standard BDB-indexed flat file scheme. You should
not be using this directly, but instead use it via Bio::DB::Flat.
Methods
default_primary_namespace
No description
Code
default_secondary_namespaces
No description
Code
parse_one_record
No description
Code
seq_to_ids
No description
Code
Methods description
None available.
Methods code
default_primary_namespacedescriptionprevnextTop
sub default_primary_namespace {
  return "ID";
}
default_secondary_namespacesdescriptionprevnextTop
sub default_secondary_namespaces {
  return qw(ACC);
}
parse_one_recorddescriptionprevnextTop
sub parse_one_record {
  my $self  = shift;
  my $fh    = shift;
  my $parser =
    $self->{embl_cached_parsers}{fileno($fh)} ||= Bio::SeqIO->new(-fh=>$fh,-format=>$self->default_file_format);
  my $seq = $parser->next_seq;
  my $ids = $self->seq_to_ids($seq);
  return $ids;
}
seq_to_idsdescriptionprevnextTop
sub seq_to_ids {
  my $self = shift;
  my $seq  = shift;

  my $display_id = $seq->display_id;
  my $accession  = $seq->accession_number;
  my %ids;
  $ids{ID}       = $display_id;
  $ids{ACC}      = $accession   if defined $accession;
  return\% ids;
}
General documentation
FEEDBACKTop
Mailing ListsTop
User feedback is an integral part of the evolution of this and other
Bioperl modules. Send your comments and suggestions preferably to one
of the Bioperl mailing lists. Your participation is much appreciated.
  bioperl-l@bioperl.org             - General discussion
http://bioperl.org/MailList.shtml - About the mailing lists
Reporting BugsTop
Report bugs to the Bioperl bug tracking system to help us keep track
the bugs and their resolution. Bug reports can be submitted via
email or the web:
  bioperl-bugs@bio.perl.org
http://bugzilla.bioperl.org/
AUTHOR - Lincoln SteinTop
Email - lstein@cshl.org
SEE ALSOTop
Bio::DB::Flat,