| blib/lib/Game/Battleship.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 10 | 22 | 45.4 |
| line | true | false | branch |
|---|---|---|---|
| 25 | 3 | 0 | unless ($i) |
| 32 | 0 | 3 | if $n > $_ |
| 42 | 0 | 3 | if (exists $self->{'players'}{$who}) |
| 48 | 0 | 3 | unless $player |
| 51 | 0 | 3 | if (ref $player eq 'Game::Battleship::Player') { } |
| 0 | 3 | elsif (ref $player eq 'HASH') { } | |
| 83 | 7 | 11 | if ($_ eq $name or $self->{'players'}{$_}{'name'} eq $name or $self->{'players'}{$_}{'id'} eq $name) |
| 93 | 1 | 9 | unless $player |
| 105 | 0 | 0 | unless $player->{'life'} |
| 110 | 0 | 0 | if $opponent->{'name'} eq $player->{'name'} or not $opponent->{'life'} |
| 124 | 0 | 0 | @alive == 1 ? : |