File Coverage

blib/lib/Data/Object/Role/Defined.pm
Criterion Covered Total %
statement 6 7 85.7
branch n/a
condition n/a
subroutine 2 3 66.6
pod 0 1 0.0
total 8 11 72.7


line stmt bran cond sub pod time code
1             # A Defined Data Type Role for Perl 5
2             package Data::Object::Role::Defined;
3              
4 217     217   119958 use 5.010;
  217         669  
  217         8347  
5 217     217   1037 use Data::Object::Role;
  217         326  
  217         1661  
6              
7             our $VERSION = '0.20'; # VERSION
8              
9             sub defined {
10 0     0 0   return 1
11             }
12              
13             1;