line |
true |
false |
branch |
66
|
1 |
3 |
if (exists $attr_for{'cell'} and 'Quad' ne $attr_for{'cell'}) |
69
|
3 |
0 |
if (defined(my $dimensions = $attr_for{'dimensions'})) |
70
|
1 |
2 |
unless 'ARRAY' eq ref $dimensions |
71
|
1 |
1 |
if @$dimensions > 2 and $$dimensions[2] > 1 |
93
|
1 |
1 |
if ($grid[0][$i]) |
118
|
46 |
42 |
$_ ? : |
141
|
0 |
0 |
if (wantarray) { } |
164
|
2 |
3 |
if (grep {not defined $_ && /^\d+/;} $x, $y) |
167
|
1 |
2 |
if ($x > $$self{'cols'}) |
170
|
1 |
1 |
if ($y > $$self{'rows'}) |
265
|
1 |
0 |
unless $self->north |
299
|
1 |
5 |
unless $self->south |
302
|
1 |
4 |
if $$self{'north_south'} >= @{$$self{'grid'};} |
334
|
1 |
3 |
unless $self->west |
368
|
0 |
3 |
unless $self->east |
394
|
9 |
18 |
$$self{'grid'}[$$self{'north_south'} + $y][$$self{'east_west'} + $x] ? : |