| line |
true |
false |
branch |
|
51
|
1 |
17 |
unless length $b |
|
52
|
31 |
27 |
$_ ? : |
|
57
|
24 |
18 |
$_ eq $ONE ? : |
|
71
|
5 |
8 |
unless defined $_[0] |
|
80
|
2 |
6 |
unless defined $code |
|
87
|
2 |
1 |
unless exists $args{'keyboard'} |
|
95
|
8 |
5 |
if (ref $x eq 'HASH') { } |
|
|
0 |
5 |
elsif (ref $x) { } |
|
96
|
3 |
5 |
if exists $x->{'payload'} |
|
109
|
7 |
3 |
unless defined $code |
|
112
|
0 |
3 |
unless (exists $vf->{$code}) |
|
127
|
0 |
1 |
unless ref $input eq 'ARRAY' |
|
129
|
0 |
1 |
unless @$input |
|
135
|
0 |
3 |
unless ref $row eq 'ARRAY' |
|
141
|
0 |
10 |
unless ref $item eq 'HASH' |
|
148
|
1 |
9 |
unless defined $command |
|
160
|
1 |
2 |
if (@_ > 1) { } |
|
|
1 |
1 |
elsif (@_ == 1) { } |
|
161
|
0 |
1 |
if (ref $_[0]) { } |
|
170
|
0 |
1 |
if (@$x > 0) |
|
171
|
0 |
0 |
if (ref $x->[0] eq 'ARRAY') { } |