File Coverage

blib/lib/BioX/SeqUtils/Promoter.pm
Criterion Covered Total %
statement 1 3 33.3
branch n/a
condition n/a
subroutine 1 1 100.0
pod n/a
total 2 4 50.0


line stmt bran cond sub pod time code
1             package BioX::SeqUtils::Promoter;
2             #use base qw(BASE);
3             ####################################################################
4             # Charles Stephen Embry #
5             # MidSouth Bioinformatics Center #
6             # University of Arkansas Little Rock #
7             ####################################################################
8              
9              
10 4     4   129516 use Class::Std;
  0            
  0            
11             use Class::Std::Utils;
12              
13             use warnings;
14             use strict;
15             use Carp;
16              
17             use version; our $VERSION = qv('0.1.1');
18              
19             {
20             my %attribute_of :ATTR( :get :set :default<''> :init_arg );
21            
22             sub BUILD {
23             my ($self, $ident, $arg_ref) = @_;
24            
25              
26             return;
27             }
28              
29             sub START {
30             my ($self, $ident, $arg_ref) = @_;
31            
32              
33             return;
34             }
35              
36             }
37              
38             1; # Magic true value required at end of module
39             __END__