Branch Coverage

blib/lib/File/Edit.pm
Criterion Covered Total %
branch 7 20 35.0


line true false branch
13 0 8 @_ > 1 ? :
45 0 0 if ($file) { }
61 0 0 if (not $in_block) { }
62 0 0 if ($o->_lines->[$n] =~ /$begin_re/u)
67 0 0 if ($o->_lines->[$n] =~ /$end_re/u)
76 0 0 if $line_begin == -1 or $line_end == -1
94 0 6 ref $line_re eq 'Regexp' ? :
98 5 7 if $l =~ /$line_re/u
104 0 6 if scalar @{$o->found;} > 1
108 1 5 if scalar @{$o->found;} == 0