| line |
true |
false |
branch |
|
28
|
0 |
1 |
unless open my $fh, '<', $filename |
|
32
|
0 |
1 |
unless $fh->sysseek(0, 2) |
|
37
|
0 |
1 |
if $size < 0 |
|
41
|
0 |
1 |
if $size & 15 |
|
61
|
0 |
56 |
unless $self->{'__num_entries'} |
|
71
|
107 |
179 |
if ($found gt $key) { } |
|
|
123 |
56 |
elsif ($found lt $key) { } |
|
72
|
0 |
107 |
$right == $mid ? : |
|
74
|
0 |
123 |
$left == $mid ? : |
|
81
|
0 |
56 |
if $key ne $found |
|
87
|
55 |
37 |
if $found ne $key |
|
92
|
55 |
40 |
if $found ne $key |
|
120
|
0 |
65 |
unless my(%pos) = $whatever->_parseFEN($fen) |
|
143
|
65 |
0 |
if ($pos{'ep'}) |
|
151
|
24 |
41 |
if ('w' eq $pos{'on_move'}) { } |
|
167
|
2 |
4092 |
if ($spec->{'field'} eq $field and $spec->{'piece'} eq $pawn) |
|
176
|
24 |
41 |
if ('w' eq $pos{'on_move'}) |
|
190
|
0 |
473 |
unless $self->{'__fh'}->sysseek($offset, 0) |
|
195
|
0 |
473 |
if $bytes_read <= 0 |
|
198
|
0 |
473 |
if 8 != $bytes_read |
|
211
|
0 |
133 |
unless $self->{'__fh'}->sysseek($offset, 0) |
|
216
|
0 |
133 |
if $bytes_read <= 0 |
|
219
|
0 |
133 |
if 16 != $bytes_read |
|
242
|
0 |
133 |
unless $move =~ /^[a-h][1-8][a-h][1-8][kbrq]?$/u |