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)
|