Branch Coverage

blib/lib/Devel/Examine/Subs/Preprocessor.pm
Criterion Covered Total %
branch 58 64 90.6


line true false branch
25 57 0 if (not defined &Devel::Examine::Subs::Preprocessor::trace)
32 16 35 if $ENV{'TRACE'}
45 18 36 if $ENV{'TRACE'}
61 14 34 if $ENV{'TRACE'}
66 45 2 if (exists $self->{'pre_procs'}{$string}) { }
75 3 10 if $ENV{'TRACE'}
78 1 10 if $ENV{'TRACE'}
84 3 8 if (not $p->{'module'} or $p->{'module'} eq '')
93 4 4 if (not $INC{$module_file}) { }
98 1 3 if ($@)
111 187 35 if (defined &{$namespace . $sub;})
116 3 4 unless ($module_is_loaded)
126 2 5 if $ENV{'TRACE'}
130 0 5 if $ENV{'TRACE'}
140 2 3 if (defined $p->{'line_num'}) { }
1 2 elsif ($p->{'inject_use'}) { }
2 0 elsif ($p->{'inject_after_sub_def'}) { }
163 1 0 unless ($index)
170 1 0 if ($index)
209 56 4 if ($file_contents[$count] =~ /^(\s*)\S/) { }
220 11 47 if ($e =~ /$single_line/) { }
1 46 elsif ($e =~ /$multi_line/) { }
226 1 0 if ($file_contents[$count] =~ /\s*\{\s*(?!\s*[\S])/)
232 1 56 if ($is_multi)
245 10 13 if $ENV{'TRACE'}
249 8 13 if $ENV{'TRACE'}
253 13 8 defined $p->{'limit'} ? :
257 1 12 if (not $exec or ref $exec ne 'CODE')
265 146 337 if ($changed)
268 3 143 if $limit == 0
278 5 1 if $ENV{'TRACE'}
282 2 1 if $ENV{'TRACE'}