| line |
true |
false |
branch |
|
60
|
0 |
6 |
unless 1 == $nargs |
|
61
|
0 |
6 |
unless defined $target |
|
62
|
0 |
6 |
unless length $target |
|
63
|
0 |
6 |
if ref $target |
|
70
|
124 |
240 |
if $sub =~ /\A_/sx |
|
71
|
0 |
240 |
if $sub =~ /\A(is_|assert_|to_)[[:upper:]]/sx |
|
72
|
24 |
216 |
if $sub =~ /\A[[:upper:]][[:upper:]]/sx |
|
73
|
0 |
216 |
if $sub =~ /\A[[:upper:]]/sx |
|
78
|
6 |
0 |
if ($_[0] =~ /\A([^_]+_)(.*\z)/sx) |
|
85
|
29 |
201 |
if $_[1]{'shadowing'} |
|
86
|
16 |
185 |
if $_[1]{'shadowed'} |
|
93
|
17 |
115 |
$_[1]{'shadowed'} ? : |
|
98
|
12 |
86 |
$_[1]{'shadowed'} ? : |
|
112
|
6 |
0 |
if ($SHOW_SHADOWED) |
|
129
|
20 |
0 |
if ($SHOW_SHADOWED) |
|
144
|
0 |
0 |
unless exists $clusters{$type} |
|
158
|
28 |
20 |
unless exists $clusters{$type} |
|
191
|
131 |
51 |
if @subs and length $line < $MAX_WIDTH |
|
210
|
0 |
12 |
unless $mro_entry->{'subs'} |
|
211
|
0 |
12 |
if (not keys %subs) { } |
|
233
|
2 |
14 |
if 'UNIVERSAL' eq $isa_entry->{'class'} |
|
234
|
2 |
12 |
unless keys %{$$isa_entry{'subs'};} |
|
247
|
349 |
326 |
if ($cv->CONST) { } |
|
|
93 |
233 |
elsif ($cv->XSUB) { } |
|
|
1 |
232 |
elsif (not defined &{$ref;}) { } |
|
258
|
2 |
12 |
unless ($found_interesting) |
|
267
|
2 |
0 |
unless ($INC{$module_path . '.pm'}) |