| line |
true |
false |
branch |
|
31
|
0 |
1 |
unless open my $fh, '<', $filename |
|
35
|
0 |
1 |
unless $fh->sysseek(0, 2) |
|
40
|
0 |
1 |
if $size < 0 |
|
44
|
0 |
1 |
if $size & 15 |
|
64
|
0 |
56 |
unless $self->{'__num_entries'} |
|
74
|
107 |
179 |
if ($found gt $key) { } |
|
|
123 |
56 |
elsif ($found lt $key) { } |
|
75
|
0 |
107 |
$right == $mid ? : |
|
77
|
0 |
123 |
$left == $mid ? : |
|
84
|
0 |
56 |
if $key ne $found |
|
90
|
55 |
37 |
if $found ne $key |
|
95
|
55 |
40 |
if $found ne $key |
|
123
|
0 |
65 |
unless my(%pos) = $whatever->_parseFEN($fen) |
|
146
|
65 |
0 |
if ($pos{'ep'}) |
|
154
|
24 |
41 |
if ('w' eq $pos{'on_move'}) { } |
|
170
|
2 |
4092 |
if ($spec->{'field'} eq $field and $spec->{'piece'} eq $pawn) |
|
179
|
24 |
41 |
if ('w' eq $pos{'on_move'}) |
|
193
|
0 |
473 |
unless $self->{'__fh'}->sysseek($offset, 0) |
|
198
|
0 |
473 |
if $bytes_read <= 0 |
|
201
|
0 |
473 |
if 8 != $bytes_read |
|
214
|
0 |
133 |
unless $self->{'__fh'}->sysseek($offset, 0) |
|
219
|
0 |
133 |
if $bytes_read <= 0 |
|
222
|
0 |
133 |
if 16 != $bytes_read |
|
245
|
0 |
133 |
unless $move =~ /^[a-h][1-8][a-h][1-8][kbrq]?$/u |