| line |
true |
false |
branch |
|
23
|
0 |
14 |
unless (exists $wrapper{$_}) |
|
28
|
1 |
6 |
if ref $wrapper{'sub'} |
|
31
|
6 |
0 |
unless ($sub =~ /::/) |
|
37
|
2 |
4 |
if (exists $wrapper{'target'}) |
|
39
|
2 |
0 |
unless ($target =~ /::/) |
|
43
|
2 |
4 |
if (my $error = _bad_target($target, \%wrapper)) |
|
52
|
2 |
2 |
unless exists $wrapper{'hashref'} |
|
53
|
3 |
1 |
unless exists $wrapper{'default'} |
|
57
|
2 |
3 |
$wrapper{'hashref'} ? : |
|
60
|
6 |
5 |
if (exists $args{$arg_name}) { } |
|
|
4 |
1 |
elsif (exists $wrapper{'default'}{$arg_name}) { } |
|
75
|
1 |
5 |
if (exists $wrapped_sub{$target}) { } |
|
|
2 |
6 |
elsif (exists $$wrap{'target'} and $$wrap{'sub'} ne $$wrap{'target'}) { } |
|
79
|
1 |
1 |
if (defined &{$target;}) |