| line |
true |
false |
branch |
|
75
|
0 |
22 |
if $Text::Shoebox::Entry::Debug |
|
76
|
0 |
22 |
if (@_ == 1 and ref $_[0] eq 'ARRAY') { } |
|
87
|
0 |
1 |
unless ref $original |
|
163
|
1 |
0 |
@{$_[0];} ? : |
|
164
|
1 |
0 |
@{$_[0];} ? : |
|
168
|
0 |
19 |
unless defined $key |
|
172
|
16 |
38 |
if $key eq $$self[$i] |
|
174
|
0 |
19 |
if (wantarray) { } |
|
177
|
4 |
15 |
unless @out |
|
239
|
1 |
6 |
if @{$_[0];} < 2 |
|
243
|
2 |
13 |
if $seen{$_[0][$i]}++ |
|
249
|
0 |
0 |
if $_[0]->are_keys_unique |
|
254
|
0 |
0 |
if $seen{$k} > 1 |
|
287
|
1 |
6 |
unless @$e |
|
289
|
4 |
6 |
unless defined $$e[$i] and length $$e[$i] |
|
291
|
1 |
5 |
if ref $$e[$i] or ref $$e[$i + 1] |
|
302
|
2 |
6 |
unless (defined $$e[$i] and $$e[$i] =~ /\S/) |
|
327
|
0 |
0 |
($toggle ^= 1) ? : |
|
536
|
0 |
1 |
ref $_[1] ? : |
|
542
|
0 |
3 |
if (exists $$map{$k}) { } |
|
547
|
3 |
0 |
if (length $k) { } |
|
548
|
0 |
3 |
unless $k =~ /^[_:a-zA-Z]/s |
|
621
|
0 |
0 |
if $_ |
|
626
|
0 |
0 |
if (@{$_[0];}) { } |