Bio::DB::Query PrebuiltResult
SummaryIncluded librariesPackage variablesSynopsisDescriptionGeneral documentationMethods
Toolbar
WebCvs
Summary
Bio::DB::Query::PrebuiltResult - DESCRIPTION of Object
Package variables
No package variables defined.
Included modules
Bio::DB::Query::QueryResultI
Bio::Root::Root
Inherit
Bio::DB::Query::QueryResultI Bio::Root::Root
Synopsis
Give standard usage here
Description
This modules provides an implementation of Bio::DB::Query::QueryResultI for
database queries through DBI.
Methods
newDescriptionCode
next_objectDescriptionCode
each_ObjectDescriptionCode
finishDescriptionCode
objsDescriptionCode
Methods description
newcode    nextTop
 Title   : new
Usage : my $obj = Bio::DB::Query::PrebuiltResult->new();
Function: Builds a new Bio::DB::Query::PrebuiltResult object
Returns : an instance of Bio::DB::Query::PrebuiltResult
Args : named parameters
-objs a reference to an array of objects that should be
returned via next_object()
next_objectcodeprevnextTop
 Title   : next_object
Usage :
Function: Obtain the next object from the result stream and return it.
Example :
Returns : A Bioperl object (implementing at least Bio::Root::RootI)
Args : none
each_ObjectcodeprevnextTop
 Title   : each_Object
Usage :
Function: This is primarily a convenience method and in most implementations
will just loop over next_object() and return an array of all
objects.
Example :
Returns : A reference to an array of objects.
Args : Optionally, an anonymous function for filtering objects. If given,
the function is passed one argument, the object to evaluate.
The object will be included in the returned array if the function
returns TRUE, and rejected otherwise.
finishcodeprevnextTop
 Title   : finish
Usage :
Function: Indicate being finished with this result so that possibly used
system resources can be released.
Example :
Returns : none
Args : none
objscodeprevnextTop
 Title   : objs
Usage : $obj->objs($newval)
Function: Get/set the objects this result is going to return via next_object()
Example :
Returns : value of objs (a reference to an array)
Args : new value (a reference to an array, optional)
Methods code
newdescriptionprevnextTop
sub new {
    my($class,@args) = @_;

    my $self = $class->SUPER::new(@args);
    
    my ($objs, $adaptor, $fact, $nfks) =
	$self->_rearrange([qw(OBJS)], @args);
    
    $self->objs($objs) if $objs;

    return $self;
}
next_objectdescriptionprevnextTop
sub next_object {
    my ($self) = @_;

    return shift(@{$self->objs()});
}
each_ObjectdescriptionprevnextTop
sub each_Object {
    my ($self,$filter) = @_;

    my @objs = grep { $filter ? &$filter($_) : 1; } @{$self->objs()};
    $self->objs([]);

    return\@ objs;
}
finishdescriptionprevnextTop
sub finish {
    shift->objs([]);
}
objsdescriptionprevnextTop
sub objs {
    my ($self,$value) = @_;
    if( defined $value) {
	$self->{'objs'} = $value;
    }
    return $self->{'objs'} || [];
}

1;
}
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
the Bioperl mailing list. Your participation is much appreciated.
  bioperl-l@bioperl.org                  - General discussion
http://bioperl.org/wiki/Mailing_lists - About the mailing lists
Support Top
 
Please direct usage questions or support issues to the mailing list:

bioperl-l@bioperl.org

rather than to the module maintainer directly. Many experienced and
reponsive experts will be able look at the problem and quickly
address it. Please include a thorough description of the problem
with code and data examples if at all possible.
Reporting BugsTop
Report bugs to the Bioperl bug tracking system to help us keep track
of the bugs and their resolution. Bug reports can be submitted via
the web:
  http://bugzilla.open-bio.org/
AUTHOR - Hilmar LappTop
Email hlapp at gmx.net
Describe contact details here
CONTRIBUTORSTop
Additional contributors names and emails here
APPENDIXTop
The rest of the documentation details each of the object methods.
Internal methods are usually preceded with a _