Branch Coverage

blib/lib/IPC/ScoreBoard.pm
Criterion Covered Total %
branch 10 20 50.0


line true false branch
24 0 8 if (@_ > 3 or not $_[0] =~ /^\d/) { }
33 8 0 unless defined $score_extra
46 8 0 if (@_ > 4 or not $_[1] =~ /^\d/) { }
55 0 8 unless defined $score_extra
57 0 8 unless CORE::open my $fh, '+>', $filename
70 0 2 if (@_ > 1) { }
78 0 2 unless CORE::open my $fh, '+<', $filename
81 0 2 unless substr($scoreboard, 0, 4) eq 'PCSB'
89 0 8 if @_ >= 2 and $_[1] eq ':noshortcuts'
91 0 8 if $import_done