Branch Coverage

blib/lib/Game/TextMapper/Apocalypse.pm

Criterion	Covered	Total	%
branch	41	46	89.1

line	true	false	branch
128	0	2	if $self->loglevel
141	27	373	if rand() < $self->settlement_chance
151	240	246	if ($coordinate % 2) { }
153	25	215	if $coordinate < $self->cols
154	19	221	if $coordinate >= ($self->rows - 1) * $self->cols
155	0	240	if $coordinate % $self->cols == 0
156	20	220	if $coordinate % $self->cols == $self->cols - 1
159	21	225	if $coordinate < $self->cols
160	19	227	if $coordinate >= ($self->rows - 1) * $self->cols
161	28	218	if $coordinate % $self->cols == 0
162	0	246	if $coordinate % $self->cols == $self->cols - 1
173	304	256	if $tiles->[$_]
199	27	139	unless @destinations
203	31	119	if ($rivers->[$next]) { }
	19	100	elsif ($self->is_sink($next, $tiles)) { }
215	80	20	if $result
247	19	902	if defined $rivers->[$coordinate] and $rivers->[$coordinate] == 0
248	157	745	if grep {$_ == $coordinate;} @$river
249	497	269	unless $_ eq "mountain"
265	400	0	if $tiles->[$i]
268	149	237	if ref $river and @$river > 1
276	0	765	if @_ > 1
277	466	299	unless ref $_[0]