| line |
true |
false |
branch |
|
26
|
0 |
6 |
unless my $args_prop = $meta->{'args'} |
|
30
|
4 |
20 |
if ($neg) { } |
|
32
|
1 |
2 |
if $argspec->{'tags'} and grep {$_ eq $tag;} @{$$argspec{"tags"};} |
|
35
|
15 |
5 |
unless $argspec->{'tags'} and grep {$_ eq $tag;} @{$$argspec{"tags"};} |
|
38
|
6 |
2 |
if exists $args->{$argname} |
|
47
|
0 |
5 |
unless my $args_prop = $meta->{'args'} |
|
48
|
1 |
4 |
if $tag =~ s/\A!// |
|
51
|
4 |
16 |
if ($neg) { } |
|
53
|
1 |
2 |
if $argspec->{'tags'} and grep {$_ eq $tag;} @{$$argspec{"tags"};} |
|
56
|
11 |
5 |
unless $argspec->{'tags'} and grep {$_ eq $tag;} @{$$argspec{"tags"};} |
|
67
|
2 |
0 |
if ($func_name =~ /(.+)::(.+)/) { } |
|
76
|
0 |
1 |
unless my $meta = _find_meta([caller 1], $func_name) |
|
83
|
0 |
1 |
unless my $meta = _find_meta([caller 1], $func_name) |
|
92
|
1 |
0 |
if ($func_name =~ /(.+)::(.+)/) { } |
|
93
|
0 |
1 |
unless defined &{$func_name;} |
|
100
|
0 |
0 |
unless defined &{$fullname;} |
|
105
|
0 |
1 |
unless $meta |
|
108
|
1 |
0 |
if ($meta->{'args'}) |
|
111
|
2 |
2 |
if exists $args->{$argname} |