Branch Coverage

blib/lib/File/Edit.pm
Criterion Covered Total %
branch 8 22 36.3


line true false branch
14 0 11 @_ > 1 ? :
46 0 0 if ($file) { }
62 0 0 if (not $in_block) { }
63 0 0 if ($o->_lines->[$n] =~ /$begin_re/u)
68 0 0 if ($o->_lines->[$n] =~ /$end_re/u)
77 0 0 if $line_begin == -1 or $line_end == -1
95 0 10 ref $line_re eq 'Regexp' ? :
99 9 15 if $l =~ /$line_re/u
105 0 10 if scalar @{$o->found;} > 1
109 1 9 if scalar @{$o->found;} == 0
147 0 1 unless defined $self->at