Branch Coverage

blib/lib/Devel/file.pm
Criterion Covered Total %
branch 17 70 24.2


line true false branch
100 0 0 if (/^v(erbose)?$/) { }
0 0 elsif (/^C(ontext)?(\d+)$/) { }
0 0 elsif (/^D(ebug)?$/) { }
0 0 elsif (/^ShowBoth(?:=(\d))?$/) { }
107 0 0 defined $1 ? :
119 1 0 if ($^P != 0)
123 0 1 if ($ShowBoth or not $have_debug_info)
124 0 0 if (not $INC{'IO/All.pm'} || eval 'use IO::All; 1;') { }
125 0 0 if $Verbose
132 0 1 if ($Debug)
133 0 0 if $have_io_all
134 0 0 if $have_debug_info
138 0 1 if (defined $SIG{'__WARN__'} and $SIG{'__WARN__'} eq \&warn_handler)
139 0 0 if $Debug
142 0 1 if $SIG{'__WARN__'}
143 0 1 if $SIG{'__DIE__'}
152 0 0 unless $SIG{'__WARN__'} eq \&warn_handler
162 0 2 if (defined $^S and $^S == 1) { }
163 0 0 if $Debug
165 0 0 $old_die ? :
173 0 2 $old_die ? :
186 0 0 if ($old_warn) { }
206 0 2 if $Debug
207 0 2 if $Debug
216 2 0 $in_die ? :
223 3 0 if $from < 1
226 0 3 if $Debug
229 3 0 if ($have_debug_info)
232 0 3 if ($ShowBoth || !$have_debug_info and $have_io_all)
239 0 3 if ($lines)
254 0 0 $is_target ? :
278 3 0 unless defined $line
288 0 0 unless -e $file
289 0 0 unless my $io = io($file)
294 0 0 unless defined $line