view release on metacpan or  search on metacpan

lib/FAST/Bio/Species.pm  view on Meta::CPAN

579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
sub division {shift->taxon->division(@_)}
 
sub common_names {shift->taxon->common_names(@_)}
sub common_name {shift->taxon->common_names(@_)}
 
sub genetic_code {shift->taxon->genetic_code(@_)}
sub mitochondrial_genetic_code {shift->taxon->mitochondrial_genetic_code(@_)}
 
sub create_date { shift->taxon->create_date(@_)}
sub pub_date { shift->taxon->pub_date(@_)}
sub update_date { shift->taxon->update_date(@_)}
 
sub db_handle { shift->taxon->db_handle(@_)}
 
sub parent_id { shift->taxon->parent_id(@_)}
sub parent_taxon_id { shift->taxon->parent_id(@_)}
 
sub version { shift->taxon->version(@_)}
sub authority { shift->taxon->authority(@_)}
sub namespace { shift->taxon->namespace(@_)}

lib/FAST/Bio/Taxon.pm  view on Meta::CPAN

451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
=head2 update_date
 
 Title   : update_date
 Usage   : $taxon->update_date($newval)
 Function: Get/Set Date this node was updated (in the database)
 Returns : value of update_date (a scalar)
 Args    : on set, new value (a scalar or undef, optional)
 
=cut
 
sub update_date {
    my $self = shift;
    return $self->{'update_date'} = shift if @_;
    return $self->{'update_date'};
}
 
=head2 pub_date
 
 Title   : pub_date
 Usage   : $taxon->pub_date($newval)
 Function: Get/Set Date this node was published (in the database)