Bio::Expression
DataSet
Summary
Bio::Expression::DataSet - DESCRIPTION of Object
Package variables
No package variables defined.
Inherit
Synopsis
Give standard usage here
Description
Describe the object here
Methods
Methods description
Usage : my $obj = new Bio::Expression::DataSet();
Function: Builds a new Bio::Expression::DataSet object
Returns : an instance of Bio::Expression::DataSet
Args : |
Usage : $obj->_initialize(%arg);
Function: Internal method to initialize a new Bio::Expression::DataSet object
Returns : true on success
Args : passed through to new() |
Usage : $obj->accession($newval)
Function:
Example :
Returns : value of accession (a scalar)
Args : on set, new value (a scalar or undef, optional) |
Usage :
Function:
Example :
Returns :
Args : |
Usage : $obj->db($newval)
Function:
Example :
Returns : value of db (a scalar)
Args : on set, new value (a scalar or undef, optional) |
Usage : $obj->pubmed_id($newval)
Function:
Example :
Returns : value of pubmed_id (a scalar)
Args : on set, new value (a scalar or undef, optional) |
Usage : $obj->web_link($newval)
Function:
Example :
Returns : value of web_link (a scalar)
Args : on set, new value (a scalar or undef, optional) |
Usage : $obj->contact($newval)
Function:
Example :
Returns : value of contact (a scalar)
Args : on set, new value (a scalar or undef, optional) |
Usage : $obj->samples($newval)
Function:
Example :
Returns : value of samples (a scalar)
Args : on set, new value (a scalar or undef, optional) |
Usage : $obj->description($newval)
Function:
Example :
Returns : value of description (a scalar)
Args : on set, new value (a scalar or undef, optional) |
Usage : $obj->design($newval)
Function:
Example :
Returns : value of design (a scalar)
Args : on set, new value (a scalar or undef, optional) |
Usage : $obj->design_description($newval)
Function:
Example :
Returns : value of design_description (a scalar)
Args : on set, new value (a scalar or undef, optional) |
Usage :
Function:
Example :
Returns :
Args : |
Methods code
sub new
{ my($class,@args) = @_;
my $self = $class->SUPER::new(@args);
$self->_initialize(@args);
return $self; } | sub _initialize
{ my($self,%arg) = @_;
foreach my $arg (keys %arg){
my $marg = $arg;
$marg =~ s/^-//;
$self->$marg($arg{$arg}) if $self->can($marg);
}
return 1;} | sub accession
{ my($self,$val) = @_;
$self->{'accession'} = $val if defined($val);
return $self->{'accession'};} | sub name
{ my($self,$val) = @_;
$self->_load();
$self->{'db'} = $val if defined($val);
return $self->{'db'};} | sub db
{ my($self,$val) = @_;
$self->{'db'} = $val if defined($val);
return $self->{'db'};} | sub pubmed_id
{ my($self,$val) = @_;
$self->_load();
$self->{'pubmed_id'} = $val if defined($val);
return $self->{'pubmed_id'};} | sub web_link
{ my($self,$val) = @_;
$self->_load();
$self->{'web_link'} = $val if defined($val);
return $self->{'web_link'};} | sub contact
{ my($self,$val) = @_;
$self->_load();
$self->{'contact'} = $val if defined($val);
return $self->{'contact'};} | sub samples
{ my($self,$val) = @_;
$self->_load();
$self->{'samples'} = $val if defined($val);
return $self->{'samples'};} | sub description
{ my($self,$val) = @_;
$self->_load();
$self->{'description'} = $val if defined($val);
return $self->{'description'};} | sub design
{ my($self,$val) = @_;
$self->_load();
$self->{'design'} = $val if defined($val);
return $self->{'design'};} | sub design_description
{ my($self,$val) = @_;
$self->_load();
$self->{'design_description'} = $val if defined($val);
return $self->{'design_description'};} | sub get_samples
{ my ($self,@args) = @_;
if ( $self->samples() ) {
return @{ $self->samples() };
}
else {
return ();
}} | sub _load
{ my $self = shift;
if ( $self->{'_load'} ) {
return 1;
}
$self->{'_load'}++;
$self->db->fill_dataset( $self );
return $self->{'_load'};} | General documentation
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
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/
The rest of the documentation details each of the object methods.
Internal methods are usually preceded with a _