view release on metacpan or  search on metacpan

lib/Bio/Biblio/BiblioBase.pm  view on Meta::CPAN

# ABSTRACT: an abstract base for other biblio classes
# AUTHOR:   Martin Senger <senger@ebi.ac.uk>
# OWNER:    2002 European Bioinformatics Institute
# LICENSE:  Perl_5


our $AUTOLOAD;


sub _accessible { shift->throw_not_implemented(); }


sub _attr_type { shift->throw_not_implemented(); }


sub AUTOLOAD {
    my ($self, $newval) = @_;
    if ($AUTOLOAD =~ /.*::(\w+)/ && $self->_accessible ("_$1")) {
        my $attr_name = "_$1";
        my $attr_type = $self->_attr_type ($attr_name);
        my $ref_sub =
            sub {
                my ($this, $new_value) = @_;

lib/Bio/DB/BiblioI.pm  view on Meta::CPAN

# ABSTRACT: an interface to a Bibliographic Query Service
# AUTHOR:   Martin Senger <martin.senger@gmail.com>
# OWNER:    2002 European Bioinformatics Institute
# LICENSE:  Perl_5



sub get_collection_id {
    my ($self,@args) = @_;
    $self->throw_not_implemented();
}


# -----------------------------------------------------------------------------


sub get_count { shift->throw_not_implemented(); }

# -----------------------------------------------------------------------------


sub find { shift->throw_not_implemented; }

# -----------------------------------------------------------------------------

# TBD: AFAIK this method is not implemented on the server side.
#      Let's comment it out for the time being...
#sub query { shift->throw_not_implemented(); }

# -----------------------------------------------------------------------------


sub reset_retrieval { shift->throw_not_implemented; }

# -----------------------------------------------------------------------------


sub get_next { shift->throw_not_implemented; }

# -----------------------------------------------------------------------------


sub get_more { shift->throw_not_implemented; }

# -----------------------------------------------------------------------------


sub has_next { shift->throw_not_implemented; }

# -----------------------------------------------------------------------------


sub get_all_ids { shift->throw_not_implemented; }

# -----------------------------------------------------------------------------


sub get_by_id { shift->throw_not_implemented; }

# -----------------------------------------------------------------------------


sub get_all { shift->throw_not_implemented; }

# -----------------------------------------------------------------------------


sub exists { shift->throw_not_implemented; }

# -----------------------------------------------------------------------------


sub destroy { shift->throw_not_implemented; }

# -----------------------------------------------------------------------------


sub get_vocabulary_names { shift->throw_not_implemented; }

# -----------------------------------------------------------------------------


sub contains { shift->throw_not_implemented; }

# -----------------------------------------------------------------------------


sub get_entry_description { shift->throw_not_implemented; }

# -----------------------------------------------------------------------------


sub get_all_values { shift->throw_not_implemented; }

# -----------------------------------------------------------------------------


sub get_all_entries { shift->throw_not_implemented; }

1;

__END__
=pod

=encoding utf-8

=head1 NAME