Condition Coverage

blib/lib/Game/HexDescribe/Utils.pm
Criterion Covered Total %
condition 54 161 33.5


and 3 conditions

line !l l&&!r l&&r condition
131 9 7353 108564 $key and ($c, $t) = $line =~ /^(\d+),(.*)/u
6375 987 0 $line ne "" and not $line =~ /^\s*#/u
166 0 0 0 $subtable =~ /^names for (.*)/u and $$data{"name for $1"}
167 0 0 0 $subtable =~ /^(?:capitalize|titlecase|highlightcase|normalize-elvish) (.*)/u and $data->{$1}
169 0 0 0 $subtable =~ /^same (.*)/u and $data->{$1} || $aliases{$1} || $1 eq 'adjacent hex'
170 0 0 0 $subtable =~ /^(?:here|nearby|closest|other|neighbouring|append|later|with|and|save|store) (.+?)( as (.+))?$/u and $data->{$1}
268 0 1 0 $map and $map->isa("Mojo::Upload")
365 0 0 0 $start and $same_dir
503 0 10 0 $redirects and not $ENV{'HEX_DESCRIBE_OFFLINE'}
623 0 0 0 $level > 1 and not exists $table_data->{$word}
0 0 0 $level > 1 and not exists $table_data->{$word} and not $locals{$word}
0 0 0 $level > 1 and not $table_data->{$word}
0 0 0 $level > 1 and not $table_data->{$word} and not $locals{$word}
633 39 0 0 defined $min and $r < $min
634 39 0 0 defined $max and $r > $max
748 0 91 0 exists $locals{$key} and ref $locals{$key} eq "ARRAY"
750 0 0 0 $globals->{$key} and $globals->{$key}{'global'}
759 2 0 0 $where and $where eq "here"
760 2 0 0 $where and $where eq "here"
2 0 0 $where and $where eq "here" and $alias
761 2 0 0 $where and $where eq "global"
762 2 0 0 $where and $where eq "global"
2 0 0 $where and $where eq "global" and $alias
777 2 0 0 $where and $where eq "here"
778 2 0 0 $where and $where eq "here"
2 0 0 $where and $where eq "here" and $alias
779 2 0 0 $where and $where eq "global"
780 2 0 0 $where and $where eq "global"
2 0 0 $where and $where eq "global" and $alias
825 268 6 1 $where and $where eq "here"
826 268 6 1 $where and $where eq "here"
274 0 1 $where and $where eq "here" and $alias
827 268 1 6 $where and $where eq "global"
828 268 1 6 $where and $where eq "global"
269 0 6 $where and $where eq "global" and $alias
1330 0 0 0 @arr == 1 and ref $arr[0] eq "ARRAY"
1374 0 0 0 $from->[0] == $points[0][0] and $from->[1] == $points[0][1]
1406 0 0 0 $$line2[$i2 - 1] and $next eq $$line2[$i2 - 1]
0 0 0 $$line2[$i2 + 1] and $next eq $$line2[$i2 + 1]

or 2 conditions

line l !l condition
631 10 29 $m || 1
632 11 28 $p || 0
1162 0 0 $ref //= ""
1459 1 4 shift() || "\n\n---\n\n"

or 3 conditions

line l !l&&r !l&&!r condition
169 0 0 0 $data->{$1} || $aliases{$1} || $1 eq 'adjacent hex'
276 0 1 1 $hex =~ /\G([a-z]="[^"]+")\s*/cgu or $hex =~ /(\S+)/cgu
509 0 0 0 $res->code == 301 or $res->code == 302
610 0 0 4 $word =~ /^([a-z]+)="(.*)"/u or $word =~ /(.*)-(\d+)$/u
682 0 0 0 $name ||= pick($map_data, $table_data, $level, $coordinates, $words, "name for $key", $redirects)
773 0 2 2 not $text or grep {$text eq $_;} @{$locals{$key};}
815 326 3 29 not $action or $action eq "save"
829 243 0 32 not $action or $action eq "quote"
1351 0 0 0 not defined $min or $d < $min
1402 0 0 0 $i1 == 0 or $i1 > $line1->$#*
1406 0 0 0 $$line2[$i2 - 1] and $next eq $$line2[$i2 - 1] or $$line2[$i2 + 1] and $next eq $$line2[$i2 + 1]
1437 0 0 0 $seen{$coord} or not $map_data->{$coord}