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'}) { } |