File Coverage

blib/lib/Data/Object/Role/Universal.pm
Criterion Covered Total %
statement 6 6 100.0
branch n/a
condition n/a
subroutine 2 2 100.0
pod n/a
total 8 8 100.0


line stmt bran cond sub pod time code
1             # ABSTRACT: A Universal Object Role for Perl 5
2             package Data::Object::Role::Universal;
3              
4 10     10   41364 use 5.010;
  10         31  
  10         351  
5 10     10   1745 use Data::Object::Role;
  10         16  
  10         89  
6              
7             map with($_), our @ROLES = qw(
8             Data::Object::Role::Constructor
9             Data::Object::Role::Defined
10             Data::Object::Role::Detract
11             Data::Object::Role::Output
12             Data::Object::Role::Ref
13             Data::Object::Role::Type
14             );
15              
16             our $VERSION = '0.20'; # VERSION
17              
18             1;
19              
20             __END__