maint: restructure to use Dist::Zilla
[bioperl-live.git] / lib / Bio / Search / StatisticsI.pm
bloba3b81148d0d4a4eba3afa33bdcd03579f76feb0a
1 #
3 # BioPerl module for wrapping runtime parameters
5 # Please direct questions and support issues to <bioperl-l@bioperl.org>
7 # Cared for by Chad Matsalla (bioinformatics1 at dieselwurks dot com)
9 # Copyright Chad Matsalla
11 # You may distribute this module under the same terms as perl itself
13 # POD documentation - main docs before the code
15 =head1 NAME
17 Bio::Search::StatisticsI - A Base object for statistics
19 =head1 SYNOPSIS
21 # do not use this object directly, it provides the following methods
22 # for its subclasses
24 my $void = $obj->set_statistic("statistic_name","statistic_value");
25 my $value = $obj->get_statistic("statistic_name");
27 =head1 DESCRIPTION
29 This is a basic container to hold the statistics returned from a program.
31 =head1 FEEDBACK
33 =head2 Mailing Lists
35 User feedback is an integral part of the evolution of this and other
36 Bioperl modules. Send your comments and suggestions preferably to
37 the Bioperl mailing list. Your participation is much appreciated.
39 bioperl-l@bioperl.org - General discussion
40 http://bioperl.org/wiki/Mailing_lists - About the mailing lists
42 =head2 Support
44 Please direct usage questions or support issues to the mailing list:
46 I<bioperl-l@bioperl.org>
48 rather than to the module maintainer directly. Many experienced and
49 reponsive experts will be able look at the problem and quickly
50 address it. Please include a thorough description of the problem
51 with code and data examples if at all possible.
53 =head2 Reporting Bugs
55 Report bugs to the Bioperl bug tracking system to help us keep track
56 of the bugs and their resolution. Bug reports can be submitted via the
57 web:
59 https://github.com/bioperl/bioperl-live/issues
61 =head1 AUTHOR - Chad Matsalla
63 Email bioinformatics1 at dieselwurks dot com
65 =head1 APPENDIX
67 The rest of the documentation details each of the object methods.
68 Internal methods are usually preceded with a _
70 =cut
73 # Let the code begin...
76 package Bio::Search::StatisticsI;
77 use strict;
79 # Object preamble - inherits from Bio::Root::Root
82 use base qw(Bio::Root::RootI);
85 =head2 get_statistic
87 Title : get_statistic
88 Usage : $statistic_object->get_statistic($statistic_name);
89 Function: Get the value of a statistic named $statistic_name
90 Returns : A scalar that should be a string
91 Args : A scalar that should be a string
93 =cut
95 sub get_statistic {
96 my ($self,$arg) = @_;
97 $self->throw_not_implemented;
101 =head2 set_statistic
103 Title : set_statistic
104 Usage : $statistic_object->set_statistic($statistic_name => $statistic_value);
105 Function: Set the value of a statistic named $statistic_name to $statistic_value
106 Returns : Void
107 Args : A hash containing name=>value pairs
109 =cut
111 sub set_statistic {
112 my ($self,$name,$value) = @_;
113 $self->throw_not_implemented;