Branch Coverage

blib/lib/File/SafeDO.pm
Criterion Covered Total %
branch 8 20 40.0


line true false branch
66 0 0 unless $file and -e $file and -f $file and -r $file
71 0 0 if ($nowarnings) { }
72 0 0 if eval q[system($_, '-Mwarnings', "-M-warnings qw($nowarnings)", $file)]
74 0 0 if eval q[system($_, '-w', $file)]
117 0 5 unless $file and -e $file and -f $file and -r $file
122 3 2 if ($nowarnings) { }
123 0 3 if eval q[system($_, '-Mwarnings', "-M-warnings qw($nowarnings)", $file)]
125 0 2 if eval q[system($_, '-w', $file)]
130 2 1 unless $recurs and UNIVERSAL::isa($rv, 'HASH') and exists $$rv{'INCLUDE'}
134 0 1 unless $rrv and UNIVERSAL::isa($rv, 'HASH')