line |
true |
false |
branch |
77
|
1 |
19 |
if (&looks_like_number($weight)) { }
|
|
1 |
18 |
elsif (defined $weight) { }
|
105
|
1 |
19 |
if (&looks_like_number($pos) and $pos >= 1 and $pos / int($pos) == 1) { }
|
|
1 |
18 |
elsif (defined $pos) { }
|
142
|
0 |
0 |
if (@_) { }
|
144
|
0 |
0 |
unless (exists $opt{'-char'})
|
151
|
0 |
0 |
if ($i > $pos + $len or $i < $pos)
|
154
|
0 |
0 |
if (exists $opt{'-annotation'}) { }
|
156
|
0 |
0 |
unless $annotations{$id}[$i]
|
203
|
602 |
706 |
if (scalar @_ == 1 and &looks_like_instance($_[0], 'ARRAY')) { }
|
210
|
584 |
724 |
if (@anno) { }
|
213
|
0 |
82243 |
if ($i > $max_index) { }
|
218
|
82243 |
0 |
if (&looks_like_instance($anno[$i], 'HASH')) { }
|
220
|
82243 |
0 |
unless $annotations{$id}[$i]
|
293
|
0 |
0 |
if (@_) { }
|
295
|
0 |
0 |
unless (exists $opt{'-char'})
|
302
|
0 |
0 |
if ($i < $pos or $i > $pos + $len)
|
305
|
0 |
0 |
if (exists $opt{'-key'}) { }
|
338
|
724 |
0 |
if (defined(my $id = $self->get_id))
|
347
|
0 |
0 |
if (my $matrix = $self->get_matrix)
|