Branch Coverage

lib/Text/Locus.pm
Criterion Covered Total %
branch 34 44 77.2


line true false branch
61 0 8 if @_ == 1
62 4 4 if @_ > 1
95 14 8 unless (exists $self->{'_table'}{$file})
142 0 1 unless $self->has_file($file)
156 0 1 unless &blessed($other) and $other->isa('Text::Locus')
195 15 2 unless (exists $self->{'_string'})
198 14 14 if $self->{'_string'}
200 28 0 if (my(@lines) = @{$self->{'_table'}{$file}{'_lines'};})
206 30 20 if ($line == $end + 1) { }
209 6 14 if ($end > $beg) { }
218 8 20 if ($end > $beg) { }
227 2 15 if (@_)
228 1 1 if ($self->{'_string'} ne '') { }
283 1 2 if (&blessed($other)) { }
2 0 elsif (not ref $other and $other =~ /^(.+):(\d+)$/) { }
286 1 1 if ($swap) { }
313 0 2 unless exists $self->{'_table'}{$oldname}
314 0 2 if exists $self->{'_table'}{$newname}
351 0 2 unless @_
352 1 1 if ($#_ == 0) { }
1 0 elsif ($#_ % 2) { }
360 2 0 if (exists $self->{'_table'}{$file})