File Coverage

blib/lib/RPerl/Test.pm
Criterion Covered Total %
statement 15 15 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod n/a
total 20 20 100.0


line stmt bran cond sub pod time code
1             # [[[ HEADER ]]]
2             package RPerl::Test;
3 8     8   112542 use strict;
  8         20  
  8         213  
4 8     8   40 use warnings;
  8         20  
  8         199  
5 8     8   44 use RPerl::AfterSubclass;
  8         18  
  8         1008  
6             our $VERSION = 0.004_000;
7              
8             # [[[ OO INHERITANCE ]]]
9 8     8   51 use parent qw(RPerl::CompileUnit::Module::Class);
  8         18  
  8         56  
10 8     8   439 use RPerl::CompileUnit::Module::Class;
  8         19  
  8         671  
11              
12             # [[[ CRITICS ]]]
13             ## no critic qw(ProhibitUselessNoCritic ProhibitMagicNumbers RequireCheckedSyscalls) # USER DEFAULT 1: allow numeric values & print operator
14              
15             # [[[ OO PROPERTIES ]]]
16             our hashref $properties = {};
17              
18             # [[[ SUBROUTINES & OO METHODS ]]]
19              
20             # OO INHERITANCE TESTING
21             our void::method $empty_method = sub {
22             ( my object $self ) = @ARG;
23             print 'Hello, World!' . "\n";
24             };
25              
26             1; # end of class