File Coverage

blib/lib/Toolforge/MixNMatch/Object/YearMonth.pm
Criterion Covered Total %
statement 12 17 70.5
branch n/a
condition n/a
subroutine 4 5 80.0
pod 0 1 0.0
total 16 23 69.5


line stmt bran cond sub pod time code
1             package Toolforge::MixNMatch::Object::YearMonth;
2              
3 2     2   166636 use strict;
  2         24  
  2         59  
4 2     2   12 use warnings;
  2         4  
  2         56  
5              
6 2     2   920 use Mo qw(build is);
  2         1078  
  2         10  
7 2     2   3976 use Mo::utils qw(check_required);
  2         26659  
  2         38  
8              
9             our $VERSION = 0.02;
10              
11             has count => (
12             is => 'ro',
13             required => 1,
14             );
15              
16             has month => (
17             is => 'ro',
18             required => 1,
19             );
20              
21             has year => (
22             is => 'ro',
23             required => 1,
24             );
25              
26             sub BUILD {
27 0     0 0   my $self = shift;
28              
29 0           check_required($self, 'count');
30 0           check_required($self, 'month');
31 0           check_required($self, 'year');
32              
33 0           return;
34             }
35              
36             1;
37              
38             __END__