File Coverage

blib/lib/RPerl/Test/PerlAPINames/Class_04_Bad_01.pm
Criterion Covered Total %
statement 66 70 94.2
branch n/a
condition n/a
subroutine 22 23 95.6
pod n/a
total 88 93 94.6


line stmt bran cond sub pod time code
1             # [[[ PREPROCESSOR ]]]
2             # <<< GENERATE_ERROR: 'ERROR ECOGEAS' >>>
3             # <<< GENERATE_ERROR: 'Perl API name conflict' >>>
4              
5             # [[[ HEADER ]]]
6 1     1   8 use RPerl;
  1         3  
  1         8  
7             package RPerl::Test::PerlAPINames::Class_04_Bad_01;
8             use strict;
9 1     1   48 use warnings;
  1         7  
  1         21  
10 1     1   6 our $VERSION = 0.001_000;
  1         4  
  1         139  
11              
12 1     1   8 # [[[ OO INHERITANCE ]]]
  1         3  
  1         124  
13             use parent qw(RPerl::CompileUnit::Module::Class);
14             use RPerl::CompileUnit::Module::Class;
15              
16             # [[[ CRITICS ]]]
17 1     1   9 ## no critic qw(ProhibitUselessNoCritic ProhibitMagicNumbers RequireCheckedSyscalls) # USER DEFAULT 1: allow numeric values & print operator
  1         3  
  1         71  
18 1     1   14 ## no critic qw(RequireInterpolationOfMetachars) # USER DEFAULT 2: allow single-quoted control characters & sigils
  1         3  
  1         8  
19              
20             # [[[ OO PROPERTIES ]]]
21 1     1   70 our hashref $properties = {};
  1         6  
  1         8  
22 1     1   10  
  1         4  
  1         6  
23             # [[[ SUBROUTINES & OO METHODS ]]]
24              
25 1     1   55 sub vform {
  1         5  
  1         41  
26 1     1   11 { my void::method $RETURN_TYPE };
  1         6  
  1         8  
27             ( my object $self) = @ARG;
28             return;
29 1     1   57 }
  1         3  
  1         7  
30 1     1   7  
  1         2  
  1         4  
31             1; # end of class