File Coverage

blib/lib/Module/Checkstyle/Check.pm
Criterion Covered Total %
statement 12 13 92.3
branch n/a
condition 1 3 33.3
subroutine 4 5 80.0
pod 3 3 100.0
total 20 24 83.3


line stmt bran cond sub pod time code
1             package Module::Checkstyle::Check;
2              
3 7     7   2167 use strict;
  7         13  
  7         244  
4 7     7   36 use warnings;
  7         12  
  7         878  
5              
6             sub register {
7 0     0 1 0 return ();
8             }
9              
10             sub new {
11 18     18 1 42 my ($class, $config) = @_;
12 18   33     116 $class = ref $class || $class;
13 18         89 my $self = bless { _config => $config }, $class;
14 18         66 return $self;
15             }
16              
17             sub config {
18 39     39 1 75 my $self = shift;
19 39         244 return $self->{_config};
20             }
21              
22             1;
23             __END__