Branch Coverage

blib/lib/Games/Tournament/Swiss/Config.pm
Criterion Covered Total %
branch 6 30 20.0


line true false branch
60 0 0 if (not ref $suspect) { }
0 0 elsif (ref $suspect eq 'ARRAY') { }
0 0 elsif (ref $suspect eq 'HASH') { }
61 0 0 unless $suspect =~ /^[A-Za-z0-9:.,]*$/
89 0 25 if (ref $self eq 'Games::Tournament::Swiss::Config' and $roles)
92 0 25 if (ref $self eq 'Games::Tournament::Swiss::Config' and $self->{'roles'}) { }
107 0 9 if (ref $self eq 'Games::Tournament::Swiss::Config' and $scores) { }
0 9 elsif (ref $self eq 'Games::Tournament::Swiss::Config' and $self->{'scores'}) { }
125 0 2 if (ref $self eq 'Games::Tournament::Swiss::Config' and $abbreviation) { }
0 2 elsif (ref $self eq 'Games::Tournament::Swiss::Config' and $self->{'abbreviation'}) { }
144 0 0 unless $algorithm =~ /^Games::Tournament::Swiss::Procedure::\w+$/
146 0 0 if ($algorithm) { }
0 0 elsif ($self->{'algorithm'}) { }
161 0 0 if (ref $self eq 'Games::Tournament::Swiss::Config' and $first) { }
0 0 elsif (ref $self eq 'Games::Tournament::Swiss::Config' and $self->{'first'}) { }