| line |
true |
false |
branch |
|
60
|
0 |
0 |
if ($option eq 'print') { } |
|
|
0 |
0 |
elsif ($option =~ /filter=(.*)$/) { } |
|
99
|
0 |
0 |
if ($Devel::Module::Trace::enabled) |
|
104
|
0 |
0 |
unless $raw |
|
105
|
0 |
0 |
unless ($indent) |
|
110
|
0 |
0 |
if $max_module == 0 |
|
111
|
0 |
0 |
if $indent == 0 |
|
114
|
0 |
0 |
if _filtered($$mod{'name'}) |
|
124
|
0 |
0 |
if ($$mod{'sub'}) |
|
128
|
0 |
0 |
if $indent == 0 |
|
129
|
0 |
0 |
if $reenable |
|
143
|
6 |
10 |
unless ($Devel::Module::Trace::enabled) |
|
154
|
0 |
10 |
unless ($$code[$l]) |
|
161
|
6 |
5 |
unless ($$code[$i] =~ /^\s*$|^\s*\#/mox) |
|
166
|
1 |
9 |
unless ($code_str =~ /^\s*(use|require)/mox) |
|
181
|
2 |
7 |
if scalar @{$cur_lvl;} |
|
202
|
0 |
0 |
if ($mod =~ /$f/mx) |
|
205
|
0 |
0 |
if ($f eq 'perl' and $mod =~ /^[\d\.]+$/mx) |
|
216
|
0 |
0 |
if _filtered($mod) |
|
219
|
0 |
0 |
if $max_module < $l1 |
|
220
|
0 |
0 |
if $max_caller < $l2 |
|
221
|
0 |
0 |
if ($$mod{'sub'}) |