Summary | Included libraries | Package variables | Synopsis | Description | General documentation | Methods |
WebCvs | Raw content |
$obj = new Bio::Biblio::PubmedBookArticle
(-title => 'Still getting started'.
-book => new Bio::Biblio::MedlineBook);
# note that there is no specialised class PubmedBook
--- OR --- $obj = new Bio::Biblio::PubmedBookArticle; $obj->title ('Still getting started');
_accessible | No description | Code |
_attr_type | No description | Code |
_accessible | description | prev | next | Top |
my ($self, $attr) = @_; return 1 if exists $_allowed{$attr}; foreach my $parent (@ISA) { return 1 if $parent->_accessible ($attr); } } # return an expected type of given $attr}
_attr_type | description | prev | next | Top |
my ($self, $attr) = @_; if (exists $_allowed{$attr}) { return $_allowed{$attr}; } else { foreach my $parent (@ISA) { if ($parent->_accessible ($attr)) { return $parent->_attr_type ($attr); } } } return 'unknown'; } } 1; __END__}
SEE ALSO | Top |
FEEDBACK | Top |
Mailing Lists | Top |
bioperl-l@bioperl.org - General discussion
http://bioperl.org/MailList.shtml - About the mailing lists
Reporting Bugs | Top |
bioperl-bugs@bioperl.org
http://bugzilla.bioperl.org/
AUTHOR | Top |
COPYRIGHT | Top |
DISCLAIMER | Top |