Branch Coverage

blib/lib/File/Grep.pm
Criterion Covered Total %
branch 18 30 60.0


line true false branch
32 14 4 if (UNIVERSAL::isa(\$file, 'SCALAR')) { }
34 0 14 unless open FILE, "$file"
49 1 17 if ($@) { }
50 0 1 unless $SILENT
55 0 116 if ($state < 0) { }
0 116 elsif ($state == 0) { }
67 14 3 if ($openfile)
68 0 17 if $abort
76 2 6 if (wantarray) { }
6 0 elsif (defined wantarray) { }
83 9 19 if (&$coderef($file, $pos, $_))
98 15 45 if (&$coderef($file, $pos, $_))
109 0 0 if (&$coderef($file, $pos, $_)) { }
125 0 0 if (&$coderef($file, $pos, $_))
139 0 0 if (&$coderef($file, $pos, $_))