| line |
true |
false |
branch |
|
23
|
0 |
6 |
unless my $args_prop = $meta->{'args'} |
|
27
|
4 |
20 |
if ($neg) { } |
|
29
|
1 |
2 |
if $argspec->{'tags'} and grep {$_ eq $tag;} @{$$argspec{'tags'};} |
|
32
|
15 |
5 |
unless $argspec->{'tags'} and grep {$_ eq $tag;} @{$$argspec{'tags'};} |
|
35
|
6 |
2 |
if exists $args->{$argname} |
|
44
|
0 |
5 |
unless my $args_prop = $meta->{'args'} |
|
45
|
1 |
4 |
if $tag =~ s/\A!// |
|
48
|
4 |
16 |
if ($neg) { } |
|
50
|
1 |
2 |
if $argspec->{'tags'} and grep {$_ eq $tag;} @{$$argspec{'tags'};} |
|
53
|
11 |
5 |
unless $argspec->{'tags'} and grep {$_ eq $tag;} @{$$argspec{'tags'};} |
|
64
|
2 |
0 |
if ($func_name =~ /(.+)::(.+)/) { } |
|
73
|
0 |
1 |
unless my $meta = _find_meta([caller 1], $func_name) |
|
80
|
0 |
1 |
unless my $meta = _find_meta([caller 1], $func_name) |
|
89
|
1 |
0 |
if ($func_name =~ /(.+)::(.+)/) { } |
|
90
|
0 |
1 |
unless defined &{$func_name;} |
|
97
|
0 |
0 |
unless defined &{$fullname;} |
|
102
|
0 |
1 |
unless $meta |
|
105
|
1 |
0 |
if ($meta->{'args'}) |
|
108
|
2 |
2 |
if exists $args->{$argname} |