Branch Coverage

blib/lib/Game/PlatformsOfPeril.pm
Criterion Covered Total %
branch 0 130 0.0


line true false branch
354 0 0 if $ent->[6]
357 0 0 if $here->[1] == 22 or $ent->[2] == 3 and $$LMap[$here->[1]][$here->[0]][1][0] == 6 or $$LMap[$here->[1] + 1][$here->[0]][1][0] == 5
362 0 0 unless interact($ent, $dest)
363 0 0 if ($ent->[0] == 0)
364 0 0 if ($ent->[5][1][0] == 6) { }
381 0 0 if @_
387 0 0 if ($value < $min) { }
0 0 elsif ($value > $max) { }
400 0 0 if (defined $lmc->[3]) { }
0 0 elsif (defined $lmc->[2]) { }
425 0 0 if $lmc->[1][2] == 8
439 0 0 if $start eq $end
448 0 0 if ($node eq $end)
455 0 0 if (not exists $seen{$new} or $cost < $costs{$new})
467 0 0 unless $linked
479 0 0 if bad_terminal()
497 0 0 if bad_terminal()
504 0 0 if @RedrawA
505 0 0 if $Animates[0][4]->() == 2
508 0 0 if not $ent->[6] and defined $ent->[4]
534 0 0 if ($ent->[0] == 1) { }
553 0 0 if $Game::PlatformsOfPeril::LMap->[$r][$c][1][0] == 5
555 0 0 if ($c != 22 and $Game::PlatformsOfPeril::LMap->[$r][$c][1][0] == 6 || $$LMap[$r + 1][$c][1][0] == 5 and $Game::PlatformsOfPeril::LMap->[$r][$c + 1][1][0] == 6 || $Game::PlatformsOfPeril::LMap->[$r][$c + 1][1][0] != 5 && $$LMap[$r + 1][$c + 1][1][0] == 5)
566 0 0 if ($r > 0)
568 0 0 if ($Game::PlatformsOfPeril::LMap->[$r][$c][1][0] == 6 and $$LMap[$r - 1][$c][1][0] == 6) { }
0 0 elsif ($Game::PlatformsOfPeril::LMap->[$r][$c][1][0] == 6 or $Game::PlatformsOfPeril::LMap->[$r][$c][1][0] == 4 and $$LMap[$r + 1][$c][1][0] == 5) { }
583 0 0 if $Game::PlatformsOfPeril::LMap->[22][$c][1][0] == 5
584 0 0 if ($Game::PlatformsOfPeril::LMap->[22][$c][1][0] == 6 and $Game::PlatformsOfPeril::LMap->[21][$c][1][0] == 6) { }
590 0 0 if ($c != 22)
600 0 0 if $Game::PlatformsOfPeril::LMap->[$x][$c][1][0] == 5
602 0 0 if ($Game::PlatformsOfPeril::LMap->[$x][$c][1][0] == 6)
603 0 0 if ($weight == 1) { }
612 0 0 if ($c != 0 and $Game::PlatformsOfPeril::LMap->[$x][$c - 1][1][0] == 6 || $Game::PlatformsOfPeril::LMap->[$x][$c - 1][1][0] == 4 && $$LMap[$x + 1][$c - 1][1][0] == 5)
622 0 0 if ($c != 22 and $Game::PlatformsOfPeril::LMap->[$x][$c + 1][1][0] == 6 || $Game::PlatformsOfPeril::LMap->[$x][$c + 1][1][0] == 4 && $$LMap[$x + 1][$c + 1][1][0] == 5)
646 0 0 if (defined $target)
658 0 0 unless defined $no_draw
668 0 0 unless -e $file
670 0 0 unless open my $fh, '<', $file
679 0 0 if length $line != 23
684 0 0 if (exists $Things{$c}) { }
685 0 0 if ($c eq 2) { }
0 0 elsif ($c eq 3) { }
695 0 0 if ($c eq 0) { }
0 0 elsif ($c eq 1) { }
696 0 0 if defined $Animates[0][5]
710 0 0 if ++$rownum == 23
712 0 0 if $rownum < 23
713 0 0 unless defined $Animates[0][5]
756 0 0 unless &first(sub { $_->[0] eq $to; } , @{$Graphs[$Rotation]{$from}})
760 0 0 unless interact($ent, $dest)
778 0 0 if (defined $x)
788 0 0 if $key eq "\e"
790 0 0 if (ord $key < 97)
864 0 0 $name =~ s/oo/ee/u ? :
881 0 0 if (defined $ent and not $ent->[6])
940 0 0 if $row == 22 or $Game::PlatformsOfPeril::LMap->[$row][$col][1][0] == 6
944 0 0 if $Game::PlatformsOfPeril::LMap->[$r][$col][1][0] == 5
945 0 0 if ($Game::PlatformsOfPeril::LMap->[$r][$col][1][0] == 6 or $r < 21 and $Game::PlatformsOfPeril::LMap->[$r][$col][1][0] == 4 and $$LMap[$r + 1][$col][1][0] == 5 or $r == 22 and $Game::PlatformsOfPeril::LMap->[$r][$col][1][0] == 4)
965 0 0 if exists $Key_Commands{$key}
969 0 0 if $ret != 0
986 0 0 if ($mrow != 22 and $ent->[5][1][0] == 4 and $$LMap[$mrow + 1][$mcol][1][0] != 5)
993 0 0 unless defined $dest
995 0 0 unless interact($ent, $dest)
997 0 0 if ($ent->[3][0] > 0 and not defined $ent->[5][2])
999 0 0 if (rand() < $ent->[3][1])