File Coverage

blib/lib/Data/Object/Role/Undef.pm
Criterion Covered Total %
statement 7 7 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod 0 1 0.0
total 10 11 90.9


line stmt bran cond sub pod time code
1             # ABSTRACT: An Undef Object Role for Perl 5
2             package Data::Object::Role::Undef;
3              
4 16     16   58940 use 5.010;
  16         55  
  16         611  
5 16     16   2596 use Data::Object::Role;
  16         27  
  16         153  
6              
7             map with($_), our @ROLES = qw(
8             Data::Object::Role::Detract
9             Data::Object::Role::Output
10             Data::Object::Role::Type
11             );
12              
13             our $VERSION = '0.20'; # VERSION
14              
15             sub defined {
16 2     2 0 5 return 0;
17             }
18              
19             1;
20              
21             __END__