Branch Coverage

blib/lib/YAML/Perl.pm
Criterion Covered Total %
branch 0 10 0.0


line true false branch
56 0 0 if (ref $filename eq 'GLOB') { }
61 0 0 if ($filename =~ /^\s*(>{1,2})\s*(.*)$/)
64 0 0 unless open $OUT, $mode, $filename
74 0 0 if (ref $filename eq 'GLOB') { }
78 0 0 unless open $IN, $filename