File Coverage

blib/lib/RPerl/Test/ScopeTypeNameValue/Class_00_Good.pm
Criterion Covered Total %
statement 66 66 100.0
branch n/a
condition n/a
subroutine 22 22 100.0
pod n/a
total 88 88 100.0


line stmt bran cond sub pod time code
1             # [[[ HEADER ]]]
2 1     1   11 use RPerl;
  1         4  
  1         16  
3             package RPerl::Test::ScopeTypeNameValue::Class_00_Good;
4             use strict;
5 1     1   77 use warnings;
  1         6  
  1         351  
6 1     1   10 our $VERSION = 0.001_000;
  1         5  
  1         172  
7              
8 1     1   8 # [[[ OO INHERITANCE ]]]
  1         5  
  1         128  
9             use parent qw(RPerl::Test);
10             use RPerl::Test;
11              
12             # [[[ CRITICS ]]]
13 1     1   10 ## no critic qw(ProhibitUselessNoCritic ProhibitMagicNumbers RequireCheckedSyscalls) # USER DEFAULT 1: allow numeric values & print operator
  1         5  
  1         52  
14 1     1   8 ## no critic qw(RequireInterpolationOfMetachars) # USER DEFAULT 2: allow single-quoted control characters & sigils
  1         2  
  1         16  
15              
16             # [[[ OO PROPERTIES ]]]
17 1     1   119 our hashref $properties
  1         5  
  1         311  
18 1     1   10 = { some_integer => my integer $TYPED_some_integer = 23 };
  1         4  
  1         10  
19              
20             # [[[ SUBROUTINES & OO METHODS ]]]
21 1     1   129 our string::method $properties_stnv = sub {
  1         4  
  1         31  
22 1     1   6 return main::scope_type_name_value($properties);
  1         5  
  1         11  
23             };
24              
25 1     1   69 1; # end of class
  1         5  
  1         183