Branch Coverage

lib/BalanceOfPower/Role/Historian.pm
Criterion Covered Total %
branch 12 58 20.6


line true false branch
32 2941 0 if ($type eq 'nation') { }
0 0 elsif ($type eq 'player') { }
40 2736 205 if ($turn and exists $stats->{$turn}) { }
42 2736 0 if ($object) { }
63 2720 30 if ($type eq 'nation') { }
30 0 elsif ($type eq 'player') { }
65 2630 90 if ($object) { }
76 30 0 if ($object) { }
129 0 0 unless $value
132 0 0 if ($value < $min)
170 0 0 unless $value
173 0 0 if ($value < $min)
206 0 0 if (defined $self->get_statistics_value($t, $nation, $factor)) { }
232 0 0 if (defined $self->get_statistics_value($t, $nation, $factor)) { }
242 0 0 unless $valid
256 0 0 if (not $v) { }
263 0 0 if ($v - $min >= $level) { }
312 0 0 unless (defined $self->get_statistics_value($y, $nation, 'production'))
367 0 0 if ($order) { }
443 149 1859 unless (defined $val)
477 0 0 unless exists $self->events->{$y}
487 0 0 if (grep {$_ eq $key;} @ignored) { }
0 0 elsif (grep {$_ eq $key;} @managed) { }
0 0 elsif (grep {$_ eq $key;} @war_events) { }
500 0 0 if ($key eq 'warstart') { }
0 0 elsif ($key eq 'warlinkedstart') { }
0 0 elsif ($key eq 'warend') { }
506 0 0 if (exists $wars{$war_id} and exists $wars{$war_id}{'warlinkedstart'}) { }
517 0 0 if (exists $wars{$war_id} and exists $wars{$war_id}{'warend'}) { }