File Coverage

blib/lib/Data/Object/Autobox/Composite/Integer.pm
Criterion Covered Total %
statement 15 17 88.2
branch n/a
condition n/a
subroutine 5 7 71.4
pod 0 2 0.0
total 20 26 76.9


line stmt bran cond sub pod time code
1             package Data::Object::Autobox::Composite::Integer;
2              
3 2     2   1629 use 5.010;
  2         7  
  2         61  
4 2     2   7 use strict;
  2         3  
  2         51  
5 2     2   6 use warnings;
  2         2  
  2         41  
6              
7 2     2   6 use parent 'Data::Object::Autobox::Common';
  2         2  
  2         20  
8              
9 2     2   104 use Data::Object::Class 'with';
  2         3  
  2         10  
10              
11             with 'Data::Object::Role::Integer';
12              
13             sub data {
14 0     0 0   goto &detract;
15             }
16            
17             sub detract {
18 0     0 0   return shift;
19             }
20              
21             1;