Branch Coverage

blib/lib/Game/TextMapper/Smale.pm
Criterion Covered Total %
branch 35 56 62.5


line true false branch
214 412 523 if @arr == 1 and ref $arr[0] eq "ARRAY"
221 0 0 if $element eq $_
228 3 1 unless $thing
236 0 1 if ($encounter eq "settlement")
237 0 0 if ($primary eq "plains")
241 0 0 if ($primary ne "plains" or member($thing, "large-town", "city"))
252 4 11 if ($primary eq "water" and $random < 10 or $primary eq "swamp" and $random < 20 or $primary eq "sand" and $random < 20 or $primary eq "grass" and $random < 60 or $primary eq "forest" and $random < 40 or $primary eq "hill" and $random < 40 or $primary eq "mountain" and $random < 20)
282 157 308 unless $world{$coordinates}
291 9 7 if ($x % 2) { }
308 9 6 if ($x % 2) { }
345 30 3 if (rand > 0.1) { }
357 57 67 if ($random < 3) { }
42 25 elsif ($random < 5) { }
382 2 13 if $hex->[0] == 1 and $terrain_above
383 5 10 if ($random < 6) { }
5 5 elsif ($random < 9) { }
2 3 elsif ($random < 11) { }
396 3 12 if $hex->[0] == 1
397 0 15 unless $reverse_lookup{$next}
412 0 0 if ($world{$coordinates})
415 0 0 if ($reverse_lookup{$world{$coordinates}} eq "plains")
421 0 0 unless @plains
438 0 0 if not defined $width or $width < 1 or $width > 100
439 0 0 if not defined $height or $height < 1 or $height > 100
459 67 330 if $1 < 1 or $2 < 1
460 145 252 if $1 > $width or $2 > $height
462 0 1 if ($bw)
465 0 0 if ($rest) { }