Condition Coverage

lib/Settlers/Map.pm
Criterion Covered Total %
condition 31 66 46.9


and 3 conditions

line !l l&&!r l&&r condition
46 1 2 0 exists $args->{'schema'}{'tiles'} and exists $args->{'schema'}{'harbors'}
71 0 0 580 $coordinates and ref $coordinates eq 'ARRAY'
0 0 580 $coordinates and ref $coordinates eq 'ARRAY' and @$coordinates == 2
82 0 0 2 $type_code and $type_code =~ qr/^[A-Z]$/
97 0 0 54 defined $number and $number =~ qr/^[0-9]+$/
112 0 0 5 $intersection and ref $intersection eq 'Settlers::Map::Intersection'
126 0 0 190 $coordinates and ref $coordinates eq 'ARRAY'
0 0 190 $coordinates and ref $coordinates eq 'ARRAY' and @$coordinates == 3
141 0 0 85 $coordinates and ref $coordinates eq 'ARRAY'
0 0 85 $coordinates and ref $coordinates eq 'ARRAY' and @$coordinates == 2
159 0 0 6 $map_plan and ref $map_plan eq 'ARRAY'
184 0 0 6 $map and ref $map eq 'HASH'
0 0 6 $map and ref $map eq 'HASH' and keys %$map == 37
203 252 108 972 $tile2 and $tile3
216 0 0 6 $intersections and ref $intersections eq 'HASH'
0 0 6 $intersections and ref $intersections eq 'HASH' and keys %$intersections == 54
250 0 0 6 $harbors and ref $harbors eq 'ARRAY'
345 884 194 60 $neighbor->{'q'} == $_->[0] && $neighbor->{'r'} == $_->[1]

or 2 conditions

line l !l condition
75 580 0 $self->{'tiles'}{$uuid} || die("Tile $uuid not found!")
135 190 0 $self->{'intersections'}{$uuid} || die("Intersection $uuid not found!")
150 85 0 $self->{'paths'}{$uuid} || die("Path $uuid not found!")

or 3 conditions

line l !l&&r !l&&!r condition
166 114 108 0 not defined $resource_number or grep(($resource_number == $_), @resource_numbers)
230 324 16308 864 $i1 eq $i2 or not $i1->is_adjacent($i2)