File Coverage

blib/lib/Data/Object/Autobox/Composite/Array.pm
Criterion Covered Total %
statement 12 15 80.0
branch n/a
condition n/a
subroutine 4 7 57.1
pod 0 3 0.0
total 16 25 64.0


line stmt bran cond sub pod time code
1             package Data::Object::Autobox::Composite::Array;
2              
3 2     2   2868 use 5.010;
  2         8  
  2         104  
4 2     2   11 use strict;
  2         5  
  2         88  
5 2     2   12 use warnings;
  2         2  
  2         186  
6              
7 2     2   752 use Data::Object::Class 'with';
  2         19796  
  2         27  
8              
9             with 'Data::Object::Role::Array';
10              
11             sub data {
12 0     0 0   goto &detract;
13             }
14            
15             sub detract {
16 0     0 0   return shift;
17             }
18              
19             sub list {
20 0     0 0   goto &values;
21             }
22              
23             1;