File Coverage

blib/lib/Data/Object/Role/Scalar.pm
Criterion Covered Total %
statement 5 5 100.0
branch n/a
condition n/a
subroutine 2 2 100.0
pod n/a
total 7 7 100.0


line stmt bran cond sub pod time code
1             # ABSTRACT: Scalar Object Role for Perl 5
2             package Data::Object::Role::Scalar;
3              
4 10     10   50021 use 5.010;
  10         35  
5 10     10   2398 use Data::Object::Role;
  10         20  
  10         76  
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.42'; # VERSION
17              
18             1;
19              
20             __END__