line |
true |
false |
branch |
76
|
1 |
19 |
if (&looks_like_number($weight)) { } |
|
1 |
18 |
elsif (defined $weight) { } |
104
|
1 |
19 |
if (&looks_like_number($pos) and $pos >= 1 and $pos / int($pos) == 1) { } |
|
1 |
18 |
elsif (defined $pos) { } |
141
|
0 |
0 |
if (@_) { } |
143
|
0 |
0 |
unless (exists $opt{'-char'}) |
150
|
0 |
0 |
if ($i > $pos + $len or $i < $pos) |
153
|
0 |
0 |
if (exists $opt{'-annotation'}) { } |
155
|
0 |
0 |
unless $annotations{$id}[$i] |
202
|
602 |
706 |
if (scalar @_ == 1 and &looks_like_instance($_[0], 'ARRAY')) { } |
209
|
584 |
724 |
if (@anno) { } |
212
|
0 |
82243 |
if ($i > $max_index) { } |
217
|
82243 |
0 |
if (&looks_like_instance($anno[$i], 'HASH')) { } |
219
|
82243 |
0 |
unless $annotations{$id}[$i] |
292
|
0 |
0 |
if (@_) { } |
294
|
0 |
0 |
unless (exists $opt{'-char'}) |
301
|
0 |
0 |
if ($i < $pos or $i > $pos + $len) |
304
|
0 |
0 |
if (exists $opt{'-key'}) { } |
337
|
724 |
0 |
if (defined(my $id = $self->get_id)) |
346
|
0 |
0 |
if (my $matrix = $self->get_matrix) |