| 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'} |