line |
true |
false |
branch |
14
|
2 |
19 |
if (ref $rule ne 'HASH') |
20
|
2 |
17 |
ref $_[0] eq 'HASH' ? : |
21
|
16 |
3 |
unless (keys %$caller_args) |
25
|
13 |
3 |
if $invocant eq (ref $DB::args[0] || $DB::args[0]) |
27
|
10 |
6 |
if (ref $DB::args[0] eq 'HASH') { } |
30
|
1 |
5 |
if (scalar(@DB::args) % 2 == 1) |
37
|
2 |
32 |
$$rule{$_} && !defined($$caller_args{$_}) ? : |
39
|
2 |
20 |
!defined($$rule{$_}) ? : |
41
|
9 |
19 |
unless exists $$caller_args{$_} |
52
|
6 |
0 |
if $invocant eq (ref $DB::args[0] || $DB::args[0]) |
58
|
1 |
16 |
if ($_[$i] and not defined $args[0]) |
63
|
1 |
4 |
if (scalar @args > 0) |
67
|
4 |
0 |
wantarray ? : |