| line |
true |
false |
branch |
|
43
|
1 |
6 |
if ($index = $start + $size) > $limit |
|
46
|
1 |
1 |
unless $index == $limit |
|
75
|
5 |
1 |
if (my $name = $keybycode{$key}) { } |
|
96
|
1 |
1 |
$2 ? : |
|
|
14 |
2 |
length $3 ? : |
|
97
|
1 |
15 |
if (/^key\d+/) { } |
|
116
|
3 |
8 |
if (defined $parameter{'0'}) |
|
119
|
1 |
3 |
if $unique{'0'} |
|
120
|
1 |
2 |
if --$unique{$_} |
|
121
|
1 |
1 |
unless defined $parameter{$_} |
|
126
|
9 |
6 |
unless defined $parameter{$_} |
|
127
|
4 |
2 |
if length $parameter{$_} > 1 |
|
131
|
2 |
4 |
if (defined $parameter{'4'}) |
|
132
|
1 |
1 |
if scalar keys %parameter > 1 |
|
141
|
9 |
1 |
unless $keybyname{lc $_} |
|
142
|
9 |
1 |
/(\d+)$/ ? : |
|
143
|
4 |
2 |
if @keys |
|
145
|
1 |
1 |
defined $packed ? : |
|
150
|
2 |
3 |
if @value |
|
158
|
2 |
3 |
if @value |
|
166
|
6 |
3 |
if @value |
|
175
|
4 |
3 |
if @value |
|
192
|
4 |
8 |
if ($self->can($canonical)) |
|
199
|
1 |
7 |
unless $method =~ /^key[0]*(\d+)$/i |
|
201
|
4 |
3 |
unless @argument |
|
203
|
2 |
1 |
defined $first ? : |
|
214
|
22 |
18 |
if (scalar @argument) |
|
216
|
1 |
21 |
unless defined $arg |
|
217
|
1 |
21 |
if defined $parameter{$key} |
|
218
|
1 |
20 |
if scalar @argument |
|
220
|
19 |
1 |
if defined $arg |
|
230
|
6 |
12 |
scalar @arg > 1 ? : |
|
235
|
7 |
2 |
wantarray ? : |
|
274
|
3 |
1 |
$_ ? : |