| line |
true |
false |
branch |
|
99
|
0 |
12 |
unless my $dispatcher = _make_dispatcher($hr)
|
|
103
|
0 |
14 |
if $@
|
|
135
|
15 |
2 |
unless $_
|
|
136
|
0 |
0 |
&looks_like_number($_) ? :
|
|
139
|
1 |
14 |
if (@_ and $_[0] eq ':nop')
|
|
147
|
0 |
14 |
unless $target_package and $subname
|
|
151
|
0 |
14 |
if exists $_multisubs{$multi_package}
|
|
158
|
7 |
19 |
if (/^D:(.*)$/) { }
|
|
|
0 |
19 |
elsif (/^.:/) { }
|
|
159
|
0 |
7 |
unless $1
|
|
169
|
0 |
14 |
unless @possible_params
|
|
173
|
14 |
0 |
unless index($dispatcher, '::') != -1
|
|
177
|
0 |
14 |
if $@
|
|
199
|
0 |
14 |
if (eval {
do {
no strict 'refs';
defined &{$multi_package . '::M';}
}
}) { }
|
|
204
|
0 |
14 |
if $@
|
|
209
|
0 |
14 |
if (eval {
do {
no strict 'refs';
defined &{"${multi_package}::$subname";}
}
}) { }
|
|
220
|
0 |
28 |
unless $spec
|
|
264
|
0 |
20 |
if Sub::Multi::Tiny::_dispatchers_created()
|
|
312
|
1 |
32 |
unless ($multi_def->{'possible_params'}{$name})
|
|
318
|
0 |
32 |
if $saw_named and not $_->{'named'}
|
|
321
|
14 |
18 |
if ($_->{'type'})
|
|
329
|
0 |
14 |
if $@
|
|
334
|
8 |
24 |
if ($_->{'where'})
|
|
342
|
0 |
8 |
if $@
|
|
357
|
0 |
13 |
unless @{$hr->{'impls'};}
|
|
364
|
7 |
6 |
if defined $custom_dispatcher
|