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	40	360	if rand() < $self->settlement_chance
151	290	281	if ($coordinate % 2) { }
153	23	267	if $coordinate < $self->cols
154	33	257	if $coordinate >= ($self->rows - 1) * $self->cols
155	0	290	if $coordinate % $self->cols == 0
156	30	260	if $coordinate % $self->cols == $self->cols - 1
159	24	257	if $coordinate < $self->cols
160	32	249	if $coordinate >= ($self->rows - 1) * $self->cols
161	23	258	if $coordinate % $self->cols == 0
162	0	281	if $coordinate % $self->cols == $self->cols - 1
173	305	291	if $tiles->[$_]
199	45	206	unless @destinations
203	54	172	if ($rivers->[$next]) { }
	26	146	elsif ($self->is_sink($next, $tiles)) { }
215	109	37	if $result
247	51	1323	if defined $rivers->[$coordinate] and $rivers->[$coordinate] == 0
248	240	1083	if grep {$_ == $coordinate;} @$river
249	676	463	unless $_ eq "mountain"
265	400	0	if $tiles->[$i]
268	215	185	if ref $river and @$river > 1
276	0	946	if @_ > 1
277	505	441	unless ref $_[0]