Condition Coverage

blib/lib/Game/HexDescribe/Utils.pm
Criterion Covered Total %
condition 52 161 32.3


and 3 conditions

line !l l&&!r l&&r condition
131 9 7353 108561 $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|other|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 41 0 0 defined $min and $r < $min
634 41 0 0 defined $max and $r > $max
748 0 93 0 exists $locals{$key} and ref $locals{$key} eq "ARRAY"
750 0 0 0 $globals->{$key} and $globals->{$key}{'global'}
766 3 0 0 $where and $where eq "here"
767 3 0 0 $where and $where eq "here"
3 0 0 $where and $where eq "here" and $alias
768 3 0 0 $where and $where eq "global"
769 3 0 0 $where and $where eq "global"
3 0 0 $where and $where eq "global" and $alias
784 2 0 0 $where and $where eq "here"
785 2 0 0 $where and $where eq "here"
2 0 0 $where and $where eq "here" and $alias
786 2 0 0 $where and $where eq "global"
787 2 0 0 $where and $where eq "global"
2 0 0 $where and $where eq "global" and $alias
832 260 6 2 $where and $where eq "here"
833 260 6 2 $where and $where eq "here"
266 0 2 $where and $where eq "here" and $alias
834 260 2 6 $where and $where eq "global"
835 260 2 6 $where and $where eq "global"
262 0 6 $where and $where eq "global" and $alias
1283 0 0 0 @arr == 1 and ref $arr[0] eq "ARRAY"
1327 0 0 0 $from->[0] == $points[0][0] and $from->[1] == $points[0][1]
1359 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 31 $m || 1
632 10 31 $p || 0
1116 0 0 $ref //= ""
1412 0 1 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)
780 0 0 2 not $text or grep {$text eq $_;} @{$locals{$key};}
822 317 3 28 not $action or $action eq "save"
836 237 0 31 not $action or $action eq "quote"
1304 0 0 0 not defined $min or $d < $min
1355 0 0 0 $i1 == 0 or $i1 > $#$line1
1359 0 0 0 $$line2[$i2 - 1] and $next eq $$line2[$i2 - 1] or $$line2[$i2 + 1] and $next eq $$line2[$i2 + 1]
1390 0 0 0 $seen{$coord} or not $map_data->{$coord}