File Coverage

blib/lib/RPerl/Test/Include/Class_01_Good.pm
Criterion Covered Total %
statement 72 72 100.0
branch n/a
condition n/a
subroutine 24 24 100.0
pod n/a
total 96 96 100.0


line stmt bran cond sub pod time code
1             # [[[ HEADER ]]]
2 1     1   12 use RPerl;
  1         7  
  1         20  
3             package RPerl::Test::Include::Class_01_Good;
4             use strict;
5 1     1   126 use warnings;
  1         7  
  1         406  
6 1     1   12 our $VERSION = 0.001_000;
  1         5  
  1         211  
7              
8 1     1   11 # [[[ OO INHERITANCE ]]]
  1         6  
  1         187  
9             use parent qw(RPerl::Test);
10             use RPerl::Test;
11              
12             # [[[ INCLUDES ]]]
13 1     1   9 use RPerl::Test::Foo qw(quux quince qorge);
  1         7  
  1         47  
14 1     1   7 use RPerl::Test::Bar;
  1         3  
  1         20  
15              
16             # [[[ OO PROPERTIES ]]]
17 1     1   106 our hashref $properties
  1         3  
  1         328  
18 1     1   17 = { empty_property => my integer $TYPED_empty_property = 2 };
  1         8  
  1         12  
19              
20             # [[[ SUBROUTINES & OO METHODS ]]]
21 1     1   131 our integer::method $empty_method = sub {
  1         5  
  1         30  
22 1     1   9 return RPerl::Test::Foo::quince();
  1         2  
  1         11  
23             };
24              
25 1     1   72 1; # end of class
  1         5  
  1         256