Condition Coverage

blib/lib/UI/KeyboardLayout.pm
Criterion Covered Total %
condition 1 1827 0.0


and 2 conditions

line l !l condition
5913 0 0 $seen{$_}++ and die "Duplicate layer name `${_}'"
5954 0 0 $_ eq $opt->{'empty'} and $_ = undef
5967 0 0 $seen{$_}++ and die "Duplicate layer name `${_}'"
6013 0 0 exists $o{$_} and die "Visual spec `${k}' overwrites exiting layer `${k}'"
6120 0 0 1 == ($obsc[0] || 0) and $free_first[0] = 0
6458 0 0 1 < length $_ and die "not a character as a deadkey: `${_}'"
6717 0 0 $cc =~ /[^\P{Blank}\x00-\x1f]/ && 'WS'
6736 0 0 defined $expl and length $expl and 1
6981 0 0 $create_a_c >= 1 && '/[/]/\\'
6982 0 0 $create_a_c >= 2 && '/^/_'
6983 0 0 $create_a_c >= 1 && ' Most of Ctrl-letters are omitted from the table; deduce them from reports for C/H/I/J/M/Z.'
8383 0 0 $DEAD && 1
8891 0 0 !$sorted3 && 'prepend'
10331 0 0 $name eq 'LATIN SMALL LETTER SCHWA' and $t = 'DIGIT ZERO'
10759 0 0 $doc && '}'
10864 0 0 not $double_occupancy and $cnt == 2 and 1
11676 0 0 ref $_ and $_->[2] and die "Do not expect a character `$_->[0]' to be a deadkey..."
12437 0 0 $linked &&= {map({ref($_ || 0) ? $_->[0] : $_;} %$linked)}
12638 0 0 defined $AppleSym{$lst[$i]} && '#'
13060 0 0 !$d && '_'

and 3 conditions

line !l l&&!r l&&r condition
5762 0 0 0 ref $class and defined(my $v = $class->{$key})
5813 0 0 0 $slot and exists $slot->{$kk}
5841 0 0 0 defined $sep2 and 3 <= @k
0 0 0 defined $sep2 and 3 <= @k and $k =~ /$sep2/
5843 0 0 0 not length $k[0] and @k == 2
5846 0 0 0 ($k[0] || '') eq "\000" and $skip_first
5847 0 0 0 @k == 1 and defined $k[0]
0 0 0 @k == 1 and defined $k[0] and 1 == length $k[0]
0 0 0 @k == 1 and defined $k[0] and 1 == length $k[0] and $k[0] ne &UI::KeyboardLayout::ucfirst($k[0])
5861 0 0 0 defined $k[$_] and $k[$_] =~ s/^--(?=.)/\000/
0 0 0 defined $k[$_] and $k[$_] =~ s/^--(?=.)/\000/ and ++$tr[$_]
5956 0 0 0 $c0 and length $L[0]
5996 0 0 0 ref($v || 1) and $IDX
0 0 0 ref($v || 1) and $IDX and defined $idx
6008 0 0 0 ref $self and push @h, $self->get_deep($self, @parts[1 .. $_]) || {}
6023 0 0 0 $ignore and not defined $k
6030 0 0 0 $ignore and not defined $k
6031 0 0 0 $k and ref $k
6037 0 0 0 $ignore and not defined $k
6106 0 0 0 $_ and ref $_
6107 0 0 0 $_ && ref $_
6108 0 0 0 $_ && ref $_
6120 0 0 0 1 == ($obsc[0] || 0) and $free_first[0] = 0 and not defined $C[1][1]
6124 0 0 0 defined $C[1][$map{$k}] and $p[0][$k]
6153 0 0 0 defined $C[$i][$j] and not defined $h[$i][$j]
6154 0 0 0 defined $c[$i][$j] and not defined $H[$i][$j]
6182 0 0 0 $c and ref $c
6184 0 0 0 defined $c and $c ne $flipped || !$dead
6218 0 0 0 $fst > $_->[0] and $fst = $_->[0]
6227 0 0 0 $seen->{$c} and $prefer_last->{$c}
6230 0 0 0 @{[] unless $seen->{$c};} and not $prefer_last->{$c}
0 0 0 @{[] unless $seen->{$c};} and not $prefer_last->{$c} and $c ne ' '
6236 0 0 0 %warn and not $skipwarn
6328 0 0 0 ref $self->{'faces'}{$f}{'[ComposeKey_Show]'} and not length $self->{'faces'}{$f}{'[ComposeKey_Show]'}[0]
6331 0 0 0 $compK and ref $compK
6334 0 0 0 defined $kkk[3] and length $kkk[3]
6364 0 0 0 &UI::KeyboardLayout::lc($s[0]) ne $s[0] and &UI::KeyboardLayout::lc($s[1]) ne $s[1]
6366 0 0 0 &UI::KeyboardLayout::uc($s[0]) ne $s[0] and &UI::KeyboardLayout::uc($s[1]) ne $s[1]
6389 0 0 0 $from->[$k] and $to->[$k]
6391 0 0 0 defined(my $s = $from->[$k][$shift]) and defined(my $ss = $to->[$k][$shift])
6392 0 0 0 $_ and ref $_
0 0 0 $_ and ref $_ and $_ = $_->[0]
6406 0 0 0 $from->[$k] and $to->[$k]
6408 0 0 0 defined(my $s = $from->[$k][$shift]) and defined(my $ss = $to->[$k][$shift])
6409 0 0 0 $_ and ref $_
0 0 0 $_ and ref $_ and $_ = $_->[0]
6420 0 0 0 $last < $_ and $last = $_
6487 0 0 0 defined $k and not ref $k
6488 0 0 0 defined $k and $$DDD{$k->[0]} || $$vk{$k->[0]}
6504 0 0 0 defined $k and not ref $k
6505 0 0 0 defined $k and $$DDD{$k->[0]} || $$vk{$k->[0]}
6554 0 0 0 defined $f and not $self->{'Age'}
6566 0 0 0 defined $f and not $self->{'Age'}
6580 0 0 0 defined $f and not $self->{'Age'}
6641 0 0 0 $self->{'faces'}{$F}{'[coverage_hash]'}{$k} and not $self->{'faces'}{$F}{'[from_dia_chains]'}{$k}
6674 0 0 0 42784 >= ord $_ || $self->{'UNames'}{$_} and not $self->{'faces'}{$F}{'[coverage_hash]'}{$_}
6700 0 0 0 'ARRAY' eq ref $C and $C->[3]
6702 0 0 0 ref $C && $C->[2]
6705 0 0 0 $prefix && $self->{'faces'}{$F}{'[prefixDocs]'}{$self->key2hex($cc)}
6712 0 0 0 $create_a_c && $cc =~ /[\cA-\cZ]/
6713 0 0 0 $create_a_c > 1 && $alpha_ctrl
6715 0 0 0 $S && ($S .= ', ')
6731 0 0 0 (ord $cc >= 128 || $cc eq ' ') && sprintf('%04X %s', ord $cc, $self->UName($cc, 'verbose', $vbell))
6732 0 0 0 $title and $docs
6736 0 0 0 defined $expl and length $expl
6740 0 0 0 $title and not $expl
0 0 0 $title and not $expl and $vbell
6745 0 0 0 $title =~ /\bLETTER\s+[AEUIYO]\b/ and $title =~ /\b(WITH|AND)\s+(HOOK\s+ABOVE|HORN)|(\s+(WITH|AND)\s+(CIRCUMFLEX|BREVE|ACUTE|GRAVE|TILDE|DOT\s+BELOW)\b){2}/
0 0 0 42800 <= ord $cc and 42891 > ord $cc
0 0 0 43003 <= ord $cc and 43007 >= ord $cc
6771 0 0 0 $opts && $opts->{'ltr'}
6772 0 0 0 $aInv and $cc ne ($base_c || 'N/A')
6860 0 0 0 length $_ and ++$cnt
6927 0 0 0 $n >= $first_ctrl and $n < $post_ctrl
6929 0 0 0 $dn and not $maps[$dn]
6940 0 0 0 not $dn and 'ARRAY' eq ref $c
0 0 0 not $dn and 'ARRAY' eq ref $c and $c->[2]
6949 0 0 0 'ARRAY' eq ref $c and $c->[2]
6958 0 0 0 $dn and $$is_D2{$baseK[$L][$shift]}
7025 0 0 0 defined $_ and ref $_
0 0 0 not $after_import || $F =~ /^(.*)##Inv#([a-f0-9]{4,})$/is and grep {$_->[4] if defined $_ and ref $_;} @$k
7026 0 0 0 ref $_ && $_->[2]
0 0 0 defined $_ and not ref $_ && $_->[2]
7027 0 0 0 ref $_ and $_->[2]
7028 0 0 0 defined $_ and ref $_
7037 0 0 0 2 > length $_ && 65536 > ord $_
7096 0 0 0 defined $_ and ref $_
7128 0 0 0 &UI::KeyboardLayout::lc($s[0]) ne $s[0] and &UI::KeyboardLayout::lc($s[1]) ne $s[1]
7130 0 0 0 &UI::KeyboardLayout::uc($s[0]) ne $s[0] and &UI::KeyboardLayout::uc($s[1]) ne $s[1]
7233 0 0 0 ref $_ && $_->[2]
7270 0 0 0 ref $_ && $_->[2]
0 0 0 $is_extra{$deadKey} && ++$seenExtra{$_}
7274 0 0 0 $_ && ref $_
7335 0 0 0 $slot and grep exists $slot->{$_}, ('map', 'name')
7658 0 0 0 $dead and $k ne '-1'
7712 0 0 0 defined $u->[0] and defined $u->[1]
0 0 0 defined $u->[0] and defined $u->[1] and $u->[0] ne $u->[1]
7732 0 0 0 $_ && ref $_
7734 0 0 0 not @cntrl and $default_bind{$k}[1]
7737 0 0 0 $k =~ /^[A-Z]$/ and $create_a_c
7738 0 0 0 $create_a_c > 1 and $shift_control_extra{$k}
7744 0 0 0 defined $_ and ++$s{$_}
7745 0 0 0 ($_->[2] || 0) >= 3 and $_->[0] = $self->dead_with_inversion(!1, $_, $face, $self->{'faces'}{$face})
7751 0 0 0 my $extra = $self->{'faces'}{$face}{'[output_layers]'} and defined $N
7766 0 0 0 not defined $CC[$sh] and defined $C[0]
7767 0 0 0 not $OK[$sh] and defined $C[0]
0 0 0 not $OK[$sh] and defined $C[0] and not $s{$C[0]}
7769 0 0 0 $sh and not $OK[$sh]
0 0 0 $sh and not $OK[$sh] and defined $C[0]
0 0 0 $sh and not $OK[$sh] and defined $C[0] and defined $was[0]
0 0 0 $sh and not $OK[$sh] and defined $C[0] and defined $was[0] and not $s{$was[0]}
0 0 0 $sh and not $OK[$sh] and defined $C[0] and defined $was[0] and not $s{$was[0]} and not $s1{$was[0]}
7779 0 0 0 $skippable and not $cnt
7781 0 0 0 my $Caps = $self->{'faces'}{$face}{'[CapsLOCKlayers]'} and defined $N
7785 0 0 0 $skippable and not defined $KK[0][0]
0 0 0 $skippable and not defined $KK[0][0] and not defined $KK[1][0]
7818 0 0 0 $CL && $CL->[0]
7819 0 0 0 $CL0 and @$CL0
0 0 0 $_ && ref $_
0 0 0 $CL0 and @$CL0 and grep defined($_), map({$_ && ref $_ ? $_->[0] : $_;} @$CL0)
7826 0 0 0 $CL0->[$_] && ref $CL0->[$_]
0 0 0 defined($CL0->[$_] && ref $CL0->[$_] ? $CL0->[$_][0] : $CL0->[$_]) and $KKK[$_] = $CL0->[$_]
7906 0 0 0 $v->[0] <= $u and $v->[0] + $v->[1] > $u
7935 0 0 0 @dead and ($x, $y) = splice(@dead, 0, 2)
7936 0 0 0 @k and ($x, $y) = splice(@k, 0, 2)
7950 0 0 0 length $next and not $next =~ /^(KEYNAME|LIGATURE|COPYRIGHT|COMPANY|LOCALENAME|LOCALEID|VERSION|SHIFTSTATE|LAYOUT|ATTRIBUTES|KEYNAME_EXT|KEYNAME_DEAD|DESCRIPTIONS|LANGUAGENAMES|ENDKBD)$/i
7969 0 0 0 length $next and not $next =~ /^(DEADKEY|KEYNAME|LIGATURE|COPYRIGHT|COMPANY|LOCALENAME|LOCALEID|VERSION|SHIFTSTATE|LAYOUT|ATTRIBUTES|KEYNAME_EXT|KEYNAME_DEAD|DESCRIPTIONS|LANGUAGENAMES|ENDKBD)$/i
8235 0 0 0 $self->{'faces'}{$b} != $L and not $remap
8289 0 0 0 $D eq ($flip_AltGr_hex || 'n/a') && $H->{'[have_AltGr_chain]'}
8319 0 0 0 &UI::KeyboardLayout::lc(scalar &UI::KeyboardLayout::chr(hex $_)) ne &UI::KeyboardLayout::uc(scalar &UI::KeyboardLayout::chr(hex $_)) && !$sp{&UI::KeyboardLayout::chr(hex $_)}
0 0 0 &UI::KeyboardLayout::lc(scalar &UI::KeyboardLayout::chr(hex $_)) eq &UI::KeyboardLayout::uc(scalar &UI::KeyboardLayout::chr(hex $_)) && !(&UI::KeyboardLayout::chr(hex $_) =~ /\p{Blank}/) && !$sp{&UI::KeyboardLayout::chr(hex $_)}
0 0 0 (&UI::KeyboardLayout::lc(scalar &UI::KeyboardLayout::chr(hex $_)) eq &UI::KeyboardLayout::uc(scalar &UI::KeyboardLayout::chr(hex $_)) && &UI::KeyboardLayout::chr(hex $_) =~ /\p{Blank}/ || $sp{&UI::KeyboardLayout::chr(hex $_)}) && $_ ne '0020'
8324 0 0 0 $to and 'ARRAY' eq ref $to
8330 0 0 0 $to and $to eq '0000'
8332 0 0 0 $map_n and ref $map_n
8333 0 0 0 hex $n > 65535 and $map_n
8334 0 0 0 $to and hex $to > 65535
8347 0 0 0 $is_invAltGr_Base_with_chain && defined $map_AltGr_over->{$n}
8348 0 0 0 $alt_n and ref $alt_n
8351 0 0 0 defined $alt_n && $$use_dead2{&UI::KeyboardLayout::chr(hex $alt_n)}
8361 0 0 0 not $DEAD || $import_dead and defined $default
0 0 0 not $DEAD || $import_dead and defined $default and 127 == hex $to || 32 > hex $to
0 0 0 not $DEAD || $import_dead and defined $default and 127 == hex $to || 32 > hex $to and 127 == hex $n || 32 > hex $n
8364 0 0 0 $DEAD || $import_dead and $d eq $to
8378 0 0 0 $expl and $EXPL
8383 0 0 0 $OUT_Apple and 32 <= hex $n
0 0 0 $OUT_Apple and 32 <= hex $n and 127 != hex $n
8415 0 0 0 $skip2 and $skip2 eq 'skip2-include0'
8431 0 0 0 ref $c && $c->[2]
8432 0 0 0 $_ and 'ARRAY' eq ref $_
0 0 0 $_ and 'ARRAY' eq ref $_ and $_ = $_->[0]
8442 0 0 0 defined $flip_AltGr && $prefix && $c eq $flip_AltGr
8443 0 0 0 $c eq $dia and $prefix
8451 0 0 0 0 <= (my $off = index("\r\t\n\e\035\034\cH\177\036\037\000", $c)) and not $prefix
0 0 0 not $spaces and $c =~ /^\p{Blank}$/
0 0 0 not $spaces and $c =~ /^\p{Blank}$/ and not $prefix
8464 0 0 0 $c eq '\\' and not $prefix
8468 0 0 0 $N == 1 and $c_noalt
0 0 0 $N == 1 and $c_noalt and $c_noalt eq '|' || $c_noalt eq '\\'
8472 0 0 0 $c eq '?' and not $prefix
8475 0 0 0 $c_noalt and $c_noalt eq q['] || $c_noalt eq '"'
8478 0 0 0 $c eq '-' and not $prefix
8481 0 0 0 $N == 1 and $c_noalt
0 0 0 $N == 1 and $c_noalt and $c_noalt eq '_' || $c_noalt eq '-'
8484 0 0 0 $N == 1 and $c_noalt
0 0 0 $N == 1 and $c_noalt and $c_noalt eq ';' || $c_noalt eq ':'
8487 0 0 0 $N == 1 and defined $c_base
0 0 0 $N == 1 and defined $c_base and 0 <= (my $ind = index(q[`1234567890=[],.'], $c_base))
8490 0 0 0 $N == 0 and 0 <= (my $ind = index('[{]}', $c))
0 0 0 $N == 0 and 0 <= (my $ind = index('[{]}', $c)) and not $prefix
8493 0 0 0 $N == 1 and $c_noalt
0 0 0 $N == 1 and $c_noalt and $c_noalt eq '/' || $c_noalt eq '?'
8508 0 0 0 defined $c2 and not $pref
8530 0 0 0 $_ ne $c and $seen{$_}
8542 0 0 0 $to = $self->{'Compositions'}{$dia[$diaN]}{$_} and '???', $out[$diaN]{$_} = $to
8585 0 0 0 /.\b(and|over)\b./ and s/^/~/
8589 0 0 0 @out > 1 and not $neg
8632 0 0 0 defined $c and defined $doc
8633 0 0 0 $old and ref $old
0 0 0 $old and ref $old and defined $old->[3]
8729 0 0 0 $_ && ref $_
8730 0 0 0 $_ && ref $_
8748 0 0 0 ref $C and $C->[2]
8752 0 0 0 'ARRAY' eq ref $c and $c->[2]
8821 0 0 0 defined $f and not $self->{'Age'}
8841 0 0 0 not $have4 and @Dia == 3
8864 0 0 0 not $spaceOK and $base eq ' '
8871 0 0 0 $_ && ref $_
8904 0 0 0 $_ && ref $_
8915 0 0 0 defined $o->[0] and defined $o->[1]
8919 0 0 0 $_ && ref $_
8926 0 0 0 $_ && ref $_
8967 0 0 0 %$map and not $k1 =~ /^[0-9a-f]{4,}$/
9019 0 0 0 $append && $NN->[$_]
9026 0 0 0 defined &$cvt($n) and $LL[$_][&$cvt($n)] = $C[$_]
9049 0 0 0 2 < length $o[$_] and $last = $_
9076 0 0 0 defined $l->[$k][$kk] and not defined $keys[$k][$kk]
9123 0 0 0 $ch and ref $ch
9124 0 0 0 $rch and ref $rch
9127 0 0 0 defined $ch and not defined $keys[$k][$kk]
0 0 0 defined $ch and not defined $keys[$k][$kk] and $whole ? !$seen[$k]{$ch} : $ch ne (defined $rch ? $rch : '')
9152 0 0 0 $self->paren_match_q($out[-1]) && $self->brackets_match_q($out[-1])
0 0 0 @_ and not $self->paren_match_q($out[-1]) && $self->brackets_match_q($out[-1])
9232 0 0 0 $recipe =~ /^(Full)?(?:(Face)|FlipLayers)\((.*)\)$/ and $m1 = $2, 1
9256 0 0 0 $notsame && !$N
9261 0 0 0 not defined $CC[$sh] and defined $C[0]
9262 0 0 0 not $OK[$sh] and defined $C[0]
0 0 0 not $OK[$sh] and defined $C[0] and not $s{$C[0]}
9264 0 0 0 $sh and not $OK[$sh]
0 0 0 $sh and not $OK[$sh] and defined $C[0]
0 0 0 $sh and not $OK[$sh] and defined $C[0] and defined $was[0]
0 0 0 $sh and not $OK[$sh] and defined $C[0] and defined $was[0] and not $s{$was[0]}
0 0 0 $sh and not $OK[$sh] and defined $C[0] and defined $was[0] and not $s{$was[0]} and not $s1{$was[0]}
9373 0 0 0 $KK and $self->charhex2key($KK)
0 0 0 $KK and $self->charhex2key($KK)
0 0 0 defined $flip_AltGr and defined $$chain{$KK and $self->charhex2key($KK)}
9378 0 0 0 $KK eq '' and defined $flip_AltGr
9398 0 0 0 $H->{'[auto_dead]'}{$o = $H->{'[first_auto_dead]'}++}++ and $o < 4096 || !$H->{'[ad_can_wrap]'}
9399 0 0 0 $o >= 4096 and $H->{'[ad_can_wrap]'}
0 0 0 $o >= 4096 and $H->{'[ad_can_wrap]'} and not $H->{'[autodead_wrapped]'}++
9434 0 0 0 $F =~ m[/] and exists $H->{'layers'}
9457 0 0 0 $layers and join $", @$layers
9463 0 0 0 $massage and not $inv
9483 0 0 0 $inv && "$inv $hexPrefix" eq 'Inv 0000'
9609 0 0 0 defined $H->{'[first_auto_dead]'} and grep defined($_), map($self->flatten_arrays($_), map($self->{'layers'}{$_}, @$LL[1 .. $#$LL]))
9686 0 0 0 defined $b and not $self->{'layers'}{$b}
9689 0 0 0 $max < $#{$$self{'layers'}{$_};} and $max = $#{$$self{'layers'}{$_};}
9690 0 0 0 $max < $_->[0] + $_->[1] and $max = $_->[0] + $_->[1]
9702 0 0 0 $keys and warn "Can't find the range of keys to which unit `${u}' belongs (max=$max; cnt=$cnt)"
9768 0 0 0 defined $f and not $self->{'Age'}
9846 0 0 0 defined $v and defined $h{'OSX_ADD_VERSION'}
10264 0 0 0 $name =~ /\bCOMBINING\b/ and not $_c =~ /\p{NonSpacingMark}/
10269 0 0 0 $with and @ext > 1
10284 0 0 0 $candidates{$k}[-1][0] =~ s/\s+SYMBOL$// and $candidates{$k}[-1][1] .= '-symbol'
10304 0 0 0 167 == hex($k) >> 8 and ($t = $name) =~ s/\b(\w|CO|VEN)(?!\1)(\w)$/$2/
10350 0 0 0 $1 && push(@$a, $1)
10369 0 0 0 @$a == 3 and &UI::KeyboardLayout::chr(hex $a->[-2]) =~ /\W|\p{Lm}/
0 0 0 @$a == 3 and &UI::KeyboardLayout::chr(hex $a->[-2]) =~ /\W|\p{Lm}/ and not $a->[-1] =~ /^
0 0 0 @$a == 3 and &UI::KeyboardLayout::chr(hex $a->[-2]) =~ /\W|\p{Lm}/ and not $a->[-1] =~ /^[-1]) =~ /\w/
10382 0 0 0 not $name and $k =~ /^[12]?F[89A]..$/ || hex $base >= 19968 && hex $base <= 40908
10400 0 0 0 $F ne $from and $T ne $to
10444 0 0 0 $raw =~ /-SYMBOL$/ and 0 <= index($append, 'SYMBOL')
10470 0 0 0 $b =~ /\bDELTA\b/ and $b =~ s/\bSMALL\b/CAPITAL/
0 0 0 $b = "GREEK SMALL LETTER $b" and ($b =~ /\bDELTA\b/ and $b =~ s/\bSMALL\b/CAPITAL/)
0 0 0 not $N{$b} and $N{"GREEK SMALL LETTER $b"}
10520 0 0 0 $compose{join $", @exp} and not join($", @exp) =~ /<(font|pseudo-upgrade)>/
0 0 0 $compose{join $", @exp} and not join($", @exp) =~ /<(font|pseudo-upgrade)>/ and $c ne $compose{join $", @exp}[0][1]
0 0 0 $compose{join $", @exp} and not join($", @exp) =~ /<(font|pseudo-upgrade)>/ and $c ne $compose{join $", @exp}[0][1] and not $known_dups{$c}
10646 0 0 0 $verbose and exists $UName_v{$c}
0 0 0 $verbose and exists $UName_v{$c} and $vbell || 9834 != ord $c
10652 0 0 0 $verbose and %$i || $A
10656 0 0 0 $vbell and 9834 == ord $c
10659 0 0 0 $verbose and $vbell || 9834 != ord $c
10704 0 0 0 $a1 and not $seen{$a1->[0][1]}++
10708 0 0 0 $a2 and $a1
0 0 0 $a2 and $a1 and @seen == 2
0 0 0 $a2 and $a1 and @seen == 2 and $a1->[0][1] ne $a2->[0][1]
10722 0 0 0 'ARRAY' eq ref $C and defined $C->[3]
10758 0 0 0 $ini && ref $ini && defined $ini->[3]
10790 0 0 0 $_ && 'ARRAY' eq ref $_
10803 0 0 0 $char eq $_ and ++$match
10821 0 0 0 $_ && ref $_
10835 0 0 0 defined $_ and shift @$_, @$_ || undef $_
10840 0 0 0 defined $_ and s/((?
10851 0 0 0 defined $res2[$_] and $penalty->[$_] gt ($p = ($OK{$res2[$_]} ? '+' : '-') . ($self->{'Age'}{$res2[$_]} || 'undef') . ($ok{$res2[$_]} ? '+' : '-') . "#$extra_penalty[$_]#" . ($self->{'UBlock'}{$res2[$_]} || ''))
0 0 0 defined $res2[$_] and $penalty->[$_] gt ($p = ($OK{$res2[$_]} ? '+' : '-') . ($self->{'Age'}{$res2[$_]} || 'undef') . ($ok{$res2[$_]} ? '+' : '-') . "#$extra_penalty[$_]#" . ($self->{'UBlock'}{$res2[$_]} || '')) and $penalty->[$_] = $p
10852 0 0 0 defined $res2[0] && defined $res2[1]
10854 0 0 0 $cnt == 2 && $res2[0] ne $res2[1] && &UI::KeyboardLayout::lc($res2[0]) eq &UI::KeyboardLayout::lc($res2[1])
10856 0 0 0 $double_occupancy and grep {$Penalize{$_} if defined $_;} @res2
10857 0 0 0 $double_occupancy and grep {$penalize{$_} if defined $_;} @res2
10858 0 0 0 defined $res2[$_] and $penalty->[$_] = "zzz$penalty->[$_]"
10860 0 0 0 defined $_ and $Penalize{$_}
0 0 0 defined $_ and $Penalize{$_} and --$cnt, $have1 = 1, undef $_
10861 0 0 0 defined $res2[$_] and $penalize{$res2[$_]}
0 0 0 defined $res2[$_] and $penalize{$res2[$_]} and $penalty->[$_] = "zzz$penalty->[$_]"
10864 0 0 0 not $double_occupancy and $cnt == 2
10871 0 0 0 @$penalty > 1 and defined $res2[1]
0 0 0 @$penalty > 1 and defined $res2[1] and $p gt $penalty->[1]
10887 0 0 0 $l <= length $_ and $l = length $_
10889 0 0 0 $l > length $_ and $_ .= ' ' x ($l - length($_))
10896 0 0 0 defined $k and not $k =~ /[^\x{2503}\x{250b}\x{2551}\x{2502}\x{2506}\s]/
10932 0 0 0 @L and not $L[-1] =~ /[^\x{2503}\x{250b}\x{2551}\x{2502}\x{2506}\s]/
10940 0 0 0 defined $k and defined $k->[0] || defined $k->[1]
10943 0 0 0 @$k == 2 && defined $k->[0] && defined $k->[1] && $kk[0] ne $kk[1] && $kk[0] eq &UI::KeyboardLayout::lc($kk[1])
10944 0 0 0 $LL and $L
0 0 0 $LL and $L and defined $k->[$_]
0 0 0 $LL and $L and defined $k->[$_] and defined $LL->[$L][$_]
10966 0 0 0 $do_lc && $do_uc
10975 0 0 0 $penalty_group->[1] and @{[] unless $penalty_group->[1][$L];}
10981 0 0 0 $set and @$set
10992 0 0 0 $do_lc && defined $set->[$elt][0]
10993 0 0 0 $do_uc && defined $set->[$elt][1]
10995 0 0 0 defined $set->[$elt][0] && defined $set->[$elt][1]
10996 0 0 0 $lc_ok && $uc_ok
10997 0 0 0 defined $have_out and $found_both || $have_out eq $uc_ok
11002 0 0 0 defined $have_out and $have_out eq $uc_ok
11633 0 0 0 $kmap and $_ = $self->apply_kmap($kmap, $_)
11634 0 0 0 ref $_ and $_ = $_->[0]
11663 0 0 0 defined $_ && ref $_
11673 0 0 0 ref $LC && ref $UC && $LC->[2] && ($UC->[2] && $uc eq $lc)
11674 0 0 0 $uc eq &UI::KeyboardLayout::ucfirst($lc) and $lc eq &UI::KeyboardLayout::lc($uc)
0 0 0 $uc eq &UI::KeyboardLayout::ucfirst($lc) and $lc eq &UI::KeyboardLayout::lc($uc) and $lc ne "\337"
0 0 0 $uc eq &UI::KeyboardLayout::ucfirst($lc) and $lc eq &UI::KeyboardLayout::lc($uc) and $lc ne "\337" and defined $lc1 == defined $uc1
11676 0 0 0 ref $_ and $_->[2]
11679 0 0 0 $prefix2 and $pref_i[1]
0 0 0 $prefix2 and $pref_i[1] and not $pref_i[0]
11680 0 0 0 $LC and ref $LC
0 0 0 $LC and ref $LC and $LC->[2]
11684 0 0 0 defined $lc1 and &UI::KeyboardLayout::uc($lc1) ne &UI::KeyboardLayout::ucfirst($lc1)
11696 0 0 0 $_->[3] and ref $_->[3]
0 0 0 $_->[3] and ref $_->[3] and $_->[3][2]
0 0 0 $_->[3] and ref $_->[3] and $_->[3][2] and push @{$$_[1];}, 'prefix'
11697 0 0 0 $_->[3] and ref $_->[3]
0 0 0 $_->[3] and ref $_->[3] and 3 == ($_->[3][2] || 0) || 24 == ($_->[3][2] || 0)
0 0 0 $_->[3] and ref $_->[3] and 3 == ($_->[3][2] || 0) || 24 == ($_->[3][2] || 0) and push @{$$_[1];}, 'prefix2'
11753 0 0 0 $which eq '-' && ($which = 0, [$f])
11754 0 0 0 $L and not $self->{'layers'}{$L->[$which]}
11795 0 0 0 $dup and not $macro{$2}
12255 0 0 0 $term and 'HASH' eq ref $h
12383 0 0 0 ref $v and $seen{"$v"}
12436 0 0 0 $linkedF && $self->{'faces'}{$linkedF}{'Face_link_map'}{$F}
12438 0 0 0 $linked && $self->{'faces'}{$F}{'Face_link_map'}{$linkedF}
12444 0 0 0 $prefix and ref $prefix
12446 0 0 0 defined $a[$_] and length $a[$_]
0 0 0 defined $a[$_] and length $a[$_] and $a[$_] = $self->key2hex($self->charhex2key($a[$_]))
12463 0 0 0 $arr = $self->create_composeArray($pref->[0], $pref->[1]) and @$arr
12503 0 0 0 @hashes and defined $pref->[4]
0 0 0 @hashes and defined $pref->[4] and length $pref->[4]
12516 0 0 0 ref $Comp_show and length $$Comp_show[$IDX->[$i]]
12838 0 0 0 $do_hex5 and not $HEX =~ /[01]/
12843 0 0 0 $do_hex5 and $HEX =~ /1/
12846 0 0 0 $do_hex5 and $HEX =~ /0/
12859 0 0 0 $do_hex5 and not $HEX =~ /0/
12871 0 0 0 $merge_states_6_and_4 && !$use_plan_c
12988 0 0 0 53248 <= ord $c and 57343 >= ord $c
13015 0 0 0 $use_base && $self->BaseKeys($K)
13016 0 0 0 defined $_ && /^\w$/
13024 0 0 0 not defined $c and defined $I
13054 0 0 0 not $d and $caps
13057 0 0 0 !$force_o && $d >= 0 && $$map{$self->keys2hex($c)}
13106 0 0 0 $doHEX and $v->[0] =~ /^[-u\x20_+=0-9a-f]\z/i
13118 0 0 0 $do_hex5 && ++$e{'hex5'}
13130 0 0 0 $v = $dd->{$k} and $v->[1]
13137 0 0 0 $term and not $do_initing
13159 0 0 0 $do_initing && !$term
13160 0 0 0 $a =~ /^hex4\z/ && ($do_hex5 ? qq[\t \n\t \n] : qq[\t \n])
13172 0 0 0 $term and $doHEX
0 0 0 $term and $doHEX and not $do_initing

or 2 conditions

line l !l condition
10 0 1 $ENV{'UI_KEYBOARDLAYOUT_DEBUG'} || 0
5785 0 0 $hash->{$k} ||= {}
5815 0 0 $slot->{$kk} || 0
5846 0 0 $k[0] || ''
5904 0 0 $kk[$_] || []
5947 0 0 $l == length $_ or die "Lengths of lines encoding rect do not match: expect $l, got `" . join("\n", '', @L, '') . q[']
5950 0 0 $l == $opt->{'rect_rows_cols'}[1] * $opt->{'rect_horizontal_counts'}[$c] + ($opt->{'rect_horizontal_counts'}[$c] - 1) * $c0 or die "Wrong line length in rect: expect $opt->{'rect_rows_cols'}[1] * $opt->{'rect_horizontal_counts'}[$c] gaps=$c0, got $l in `" . join("\n", '', @L, '') . q[']
5971 0 0 $out{$opt->{'layer_names'}[$i] . "\262"} ||= [map([$base->[$_][0], $shift->[$_][0]], 0 .. $#$base)]
5993 0 0 @_ || (return)
5996 0 0 $v || 1
6008 0 0 $self->get_deep($self, @parts[1 .. $_]) || {}
6009 0 0 $self->get_deep($h, @parts[1 .. $_]) || {}
6010 0 0 $self->get_deep($h, @parts[0 .. $_]) || {}
6054 0 0 $self->{'faces'}{$face}{'[coverage_hex]'} ||= {}
6110 0 0 $c[0][$_] || ''
6120 0 0 $obsc[0] || 0
6127 0 0 $skipwarn || ''
6134 0 0 $C[0][$k] || '.'
6182 0 0 $C->[3] || '???'
6183 0 0 $dead || ''
6200 0 0 shift() || {}
0 0 shift() || {}
6207 0 0 $self->{'face_back'}{$F} ||= {}
6446 0 0 $self->{'faces'}{$f}{"[$_]"} ||= {}
6447 0 0 $self->{'faces'}{$f}{"[$_]"} ||= []
6704 0 0 $base_c || 'N/A'
6714 0 0 $ctrl_special{$C} || ''
6735 0 0 $docs || ''
6766 0 0 $expl || ''
6772 0 0 $base_c || 'N/A'
6777 0 0 shift() || ''
6883 0 0 $access{$ddd} ||= \@D
6903 0 0 $self->{'faces'}{$F}{"[$_]"} || 0
7028 0 0 $_->[2] || 0
7207 0 0 $data->{'faces'}{$F}{'[Explicit_AltGr_Invert]'} || []
7650 0 0 $v->[0] = $scan_codes{$K} or die "Can't find the scancode for the VK key `${K}'"
7678 0 0 $ctrl[0] || 0
7679 0 0 $ctrl[1] || 0
7733 0 0 $u->[0][0] or 'N/A'
7739 0 0 $deadkeys ||= []
7745 0 0 $_->[2] || 0
7810 0 0 $_->[1] or 0
7831 0 0 $_->[1] or 0
7842 0 0 $double_scan_VK{&UI::KeyboardLayout::uc("$i[0] $i[1]")} || ''
7974 0 0 $self->{'[seen_knames]'} ||= {}
8275 0 0 ($Dead2 || {})->{$self->charhex2key($d)} || {}
8302 0 0 $$Dead2{$self->charhex2key($flip_AltGr_hex)} || {}
8327 0 0 $to->[2] || 0
8365 0 0 $flip_AltGr_hex || 'n/a'
8367 0 0 $H->{'[DeadChar_32bitTranslation]'} || '003f'
8450 0 0 $self->{'Diacritics_Limits'}{'ALL'} || [(0) x 7]
8568 0 0 $1 || ''
8581 0 0 &UI::KeyboardLayout::lc(scalar $self->UName($_)) || ''
8582 0 0 &UI::KeyboardLayout::lc(scalar $self->UName($_)) || ''
8606 0 0 $a || ''
8614 0 0 $a || ''
8663 0 0 shift() || 0
8685 0 0 $deadkey or ''
0 0 $self->{'faces'}{$face}{'[HTML_classes]'}{$deadkey or ''} ||= {}
8697 0 0 shift() || '[none]'
8758 0 0 $self->{'faces'}{$face}{'[g_offsets]'} || [(0) x @$g]
8854 0 0 $self->{'faces'}{$face}{'[AltSubstitutions]'} || {}
9007 0 0 shift() || 0
9058 0 0 @$_ == $c or die 'Stacking: number of layers ', scalar @$_, " != number of layers $c of the first elt"
9078 0 0 $keys[$k] ||= []
9093 0 0 @$_ == $c or die 'Stacking: number of layers ', scalar @$_, " != number of layers $c of the reference face"
9129 0 0 $keys[$k] ||= []
9444 0 0 $1 || ''
9447 0 0 $key or ''
9455 0 0 shift() || ''
9460 0 0 $layers ||= [0 .. $#{$$self{'faces'}{$F}{'layers'};}]
9529 0 0 $self->{'layers'}{"[empty$layerL]"} ||= [map([], 1 .. $layerL)]
9600 0 0 $H->{'[Explicit_AltGr_Invert]'} || []
9655 0 0 $self->{'layers'}{$new_Name} ||= [map(&$Tr($_), @{$self->{'layers'}{$LLL->[$n]};})]
9796 0 0 $F->{'[layers_mods_keys]'} || ['', 'rA']
9797 0 0 $F->{'[layers_modifiers]'} || []
9812 0 0 $tr_mods_keys{'lC'} || $tr_mods_keys{'C'} || $tr_mods_keys{'rC'} || 'C'
9897 0 0 $F->{'[Apple_Override]'} || []
9907 0 0 $F->{'[Apple_Duplicate]'} || [110, 10, 71, 10, 102, 49, 104, 49]
10649 0 0 Unicode::UCD::charinfo(ord $c) || {}
10835 0 0 @$_ || undef $_
10842 0 0 $_ || 0
10851 0 0 $self->{'Age'}{$res2[$_]} || 'undef'
0 0 $self->{'UBlock'}{$res2[$_]} || ''
10886 0 0 shift() || 0
10894 0 0 $k || 0
10902 0 0 $bold{$group} || "\x{2551}"
10963 0 0 shift() || 0
0 0 shift() || 1e+100
0 0 shift() || 0
11567 0 0 shift() || {}
11573 0 0 shift() || {}
11660 0 0 shift() || []
11672 0 0 $name || ''
11678 0 0 $_->[2] || 0
0 0 $_->[2] || 0
11717 0 0 $opts{'oneRow'} && $kbdrow++ || 0
11723 0 0 $opts{'startKey'} || 0
11729 0 0 shift @fixed || ''
11761 0 0 $self->{'faces'}{$f}{'[HTML_classes]'}{length $prefix ? $self->key2hex($prefix) : ''} || {}
12233 0 0 shift() || \*ARGV
12342 0 0 $to->{$k} || {}
12378 0 0 $h->{'[Added]'} || {}
12380 0 0 $added->{$a} || ''
0 0 $added->{$b} || ''
12437 0 0 $_ || 0
12719 0 0 $Apple_recode{$kk} or 123
12721 0 0 $Apple_recode{$k} or 123
12733 0 0 $AppleSym[$i] || ''
13005 0 0 shift() || {}
0 0 shift() || {}
0 0 shift() || {'dup', {}}
13016 0 0 $use_base || 0
13025 0 0 $use_base || 0
13050 0 0 $c->[2] || 0
13071 0 0 shift() || {}
0 0 shift() || {}
13091 0 0 $v->[2] || 0
13114 0 0 shift() || {}

or 3 conditions

line l !l&&r !l&&!r condition
5780 0 0 0 ref $class || $class
5844 0 0 0 not @k or grep((!length($_)), @k)
5873 0 0 0 $from or exists $extra{$k}
5923 0 0 0 $from or exists $extra{$k}
6113 0 0 0 defined $H[0][$_] or not defined $C[0][$_]
0 0 0 defined $H[0][$_] or not defined $C[0][$_] or $skipwarn
0 0 0 defined $H[0][$_] or not defined $C[0][$_] or $skipwarn or warn "Symbol char `$c[0][$_]' not copied to the second face while the slot is empty"
6184 0 0 0 $c ne $flipped || !$dead
6219 0 0 0 $last >= $fst or $#$a >= $fst
6255 0 0 0 $self->{'layers'}{'[ini_copy1]'}{$_} || $self->{'layers'}{'[ini_copy]'}{$_} || $self->{'layers'}{$_}
6304 0 0 0 'HASH' ne ref $self->{'faces'}{$f} or $f =~ /\bVK$/
6326 0 0 0 defined $self->{'faces'}{$f}{"[$_]"} or $self->{'faces'}{$f}{"[$_]"} = $R{$_}
6382 0 0 0 'HASH' ne ref $self->{'faces'}{$f} or $f =~ /\bVK$/
6400 0 0 0 'HASH' ne ref $self->{'faces'}{$f} or $f =~ /\bVK$/
6416 0 0 0 'HASH' ne ref $self->{'faces'}{$f} or $f =~ /\bVK$/
6424 0 0 0 'HASH' ne ref $self->{'faces'}{$f} or $f =~ /\bVK$/
6430 0 0 0 'HASH' ne ref $self->{'faces'}{$f} or $f =~ /\bVK$/
6434 0 0 0 'HASH' ne ref $self->{'faces'}{$f} or $f =~ /\bVK$/
6441 0 0 0 'HASH' ne ref $self->{'faces'}{$f} or $f =~ /\bVK$/
6460 0 0 0 $s{$_}++ || push(@d, $_)
6488 0 0 0 $$DDD{$k->[0]} || $$vk{$k->[0]}
6489 0 0 0 $k->[2] || ($$export{$k->[0]} ? 2 : 1)
6505 0 0 0 $$DDD{$k->[0]} || $$vk{$k->[0]}
6506 0 0 0 $k->[2] || ($$export{$k->[0]} ? 2 : 1)
6516 0 0 0 $self->{'faces'}{$f}{'faceDeadKeys2'} or $self->{'faces'}{$f}{'layerDeadKeys2'}
6629 0 0 0 $h1->{$k} or $self->print_codepoint($k)
6633 0 0 0 $h1->{$k} or $self->print_codepoint($k)
6651 0 0 0 $self->{'faces'}{$F}{'[coverage_hash]'}{$_} || ++$lost_diac
6663 0 0 0 42784 >= ord $_ or $self->{'UNames'}{$_}
6674 0 0 0 42784 >= ord $_ || $self->{'UNames'}{$_}
6719 0 0 0 $type or $c =~ /($rxZW)$/o
6728 0 0 0 !!$fill || $cc eq "\x{34f}"
6735 0 0 0 $title ||= $docs || ''
6745 0 0 0 0 <= index(&UI::KeyboardLayout::lc("\x{204a}\x{1f7}\x{a765}\x{195}\x{1f6}\x{1d79}"), &UI::KeyboardLayout::lc($cc)) or 42800 <= ord $cc and 42891 > ord $cc
0 0 0 0 <= index(&UI::KeyboardLayout::lc("\x{204a}\x{1f7}\x{a765}\x{195}\x{1f6}\x{1d79}"), &UI::KeyboardLayout::lc($cc)) or 42800 <= ord $cc and 42891 > ord $cc or 43003 <= ord $cc and 43007 >= ord $cc
6839 0 0 0 $s{$_}++ or push @d, $_
6848 0 0 0 $compK->{$c} || warn("??? Skip non-array prefix key `${c}' for face `${F}', k=`${dK}'")
6927 0 0 0 $n >= $first_ctrl and $n < $post_ctrl or $skip_sections[$n]
6948 0 0 0 3 == ($c->[2] || 0) || 24 == ($c->[2] || 0)
6954 0 0 0 3 == ($c->[2] || 0) || 24 == ($c->[2] || 0)
6955 0 0 0 $pre or $self->{'faces'}{$F}{'[coverage0_prefix]'}{$c}
6958 0 0 0 $pre ||= $dead
7025 0 0 0 $after_import || $F =~ /^(.*)##Inv#([a-f0-9]{4,})$/is
7027 0 0 0 ref $_ and $_->[2] or $$d{ref $_ ? $_->[0] : $_}
7054 0 0 0 exists $H->{'[imported2key]'}{$i} or exists $H->{'[imported2key_auto]'}{$i}
0 0 0 $H->{'[coverage0_prefix]'}{$k} or $H->{'[auto_dead]'}{$k}
7156 0 0 0 ref $class || $class
7168 0 0 0 'HASH' ne ref $data->{'faces'}{$F} or $F =~ /\bVK$/
7172 0 0 0 'HASH' ne ref $data->{'faces'}{$F} or $F =~ /\bVK$/
7176 0 0 0 'HASH' ne ref $data->{'faces'}{$F} or $F =~ /\bVK$/
7183 0 0 0 'HASH' ne ref $data->{'faces'}{$F} or $F =~ /\bVK$/
7221 0 0 0 'HASH' ne ref $data->{'faces'}{$F} or $F =~ /\bVK$/
7243 0 0 0 'HASH' ne ref $data->{'faces'}{$F} or $F =~ /\bVK$/
7270 0 0 0 $seen0{$_}++ || ++$seen1{$_}
0 0 0 $not_in_0 && !$is_extra{$deadKey} || $seen00{$_} || ++$seen1only{$_}
7288 0 0 0 $coverage1_prefix{$_} || $is_extra{$_}
7658 0 0 0 $seen_dead{$k}++ or push @dead, $k
7705 0 0 0 1 != length $k or ord $k > 65535
7713 0 0 0 $fix{$u->[0]} || &UI::KeyboardLayout::uc($u->[0])
7714 0 0 0 $fix{$u->[0]} || &UI::KeyboardLayout::ucfirst($u->[0])
7730 0 0 0 $known_scancode || $scan_codes{$k}
7750 0 0 0 keys %s || @cntrl
7793 0 0 0 $pre_ctrl < 2 * @$u or $self->{'faces'}{$face}{'[keep_missing_ctrl]'}
7800 0 0 0 defined $KK[$_][0] or $KK[$_] = $d[$_]
7852 0 0 0 $seen_scan{$i->[0]} or $seen_VK{$i->[1]}
7987 0 0 0 $seen{$_} or ++$miss{$_}
8250 0 0 0 ord $c < 32 or ord $c == 127
8256 0 0 0 3 == ($to->[2] || 0) || 3 == ($to->[2] || 0) >> 3
8292 0 0 0 $#maps or $is_invAltGr_Base_with_chain
8309 0 0 0 $invertAlt0 || $is_invAltGr_Base_with_chain
8342 0 0 0 $to ||= $default
8361 0 0 0 $DEAD || $import_dead
0 0 0 127 == hex $to || 32 > hex $to
0 0 0 127 == hex $n || 32 > hex $n
8364 0 0 0 $DEAD || $import_dead
8386 0 0 0 $keys ||= @keys
8419 0 0 0 $idx >= $need or defined $v[$idx]
8464 0 0 0 $c eq '|' or $c eq '\\' and not $prefix
8468 0 0 0 $c_noalt eq '|' || $c_noalt eq '\\'
8472 0 0 0 $c eq '/' or $c eq '?' and not $prefix
8475 0 0 0 $c_noalt eq q['] || $c_noalt eq '"'
8478 0 0 0 $c eq '_' or $c eq '-' and not $prefix
8481 0 0 0 $c_noalt eq '_' || $c_noalt eq '-'
8484 0 0 0 $c_noalt eq ';' || $c_noalt eq ':'
8493 0 0 0 $c_noalt eq '/' || $c_noalt eq '?'
8585 0 0 0 $AA cmp $BB or $A cmp $B
8698 0 0 0 $c eq ' ' || $c eq $self_OK && defined $dia
8724 0 0 0 exists $self->{'layers'}{$_} or $_ = $self->make_translated_layers($_, $face, [$N], $deadkey)->[0]
8742 0 0 0 exists $self->{'layers'}{$_} or $_ = $self->make_translated_layers($_, $face, [$N], $deadkey)->[0]
8767 0 0 0 $L or $shift
0 0 0 $L or $shift or $k >= $tot
8792 0 0 0 $k >= $tot or $#recipes < (my $r = $r{$k})
8891 0 0 0 $sorted3 || $sorted2
8907 0 0 0 !$_ || ref $_
8917 0 0 0 !defined($_) || ref $_
8918 0 0 0 defined $o->[$_] or $o->[$_] = $o2->[$_]
9173 0 0 0 my $R = $self->{'face_recipes'}{$face} or defined $r
9192 0 0 0 $self->{'faces'}{$face}{'[ini_layers_prefix]'} || $self->{'faces'}{$face}{'[ini_layers]'}
0 0 0 $full ? undef : $self->{'faces'}{$face}{'[ini_layers_prefix]'} || $self->{'faces'}{$face}{'[ini_layers]'} or $self->{'faces'}{$face}{'layers'}
9241 0 0 0 $N or not $notsame
9398 0 0 0 $o < 4096 || !$H->{'[ad_can_wrap]'}
9402 0 0 0 $H->{'[auto_dead]'}{$o = $H->{'[first_auto_dead]'}++}++ or $H->{'[deadkeyFaceHexMap]'}{$self->key2hex(&UI::KeyboardLayout::chr($o))}
9429 0 0 0 @FF == 1 or $FF[-1] eq 'VK'
9447 0 0 0 Deparse error: Bizarre copy of CODE in list assignment at /usr/local/lib/perl5/5.22.0/B/Deparse.pm line 4035. {defined $layers ? $layers : 'All'} ||= $HH->{$k}
9496 0 0 0 'HASH' ne ref $self->{'faces'}{$F} or $F =~ /\bVK$/
9505 0 0 0 $H->{'[DeadKey__Maps]'}{$_} || $H->{'[ComposeKeys]'}{$_}
9517 0 0 0 'HASH' ne ref $self->{'faces'}{$F} or $F =~ /\bVK$/
9548 0 0 0 @FF == 1 or $FF[-1] eq 'VK'
9559 0 0 0 $Kn != $#prefix || !$trail_nonprefix
9582 0 0 0 @FF == 1 or $FF[-1] eq 'VK'
9597 0 0 0 'HASH' ne ref $self->{'faces'}{$F} or $F =~ /\bVK$/
9697 0 0 0 $k = $oem_keys{$k} or warn("Can't find a key with VKEY `${c}', unit=$u, lim=$cnt"), return
9780 0 0 0 $self->{'DEADKEYS'}{$_} || $self->{'[seen_knames]'}{&UI::KeyboardLayout::chr(hex $_)} || $F->{'[prefixDocs]'}{$_} || $self->UName($_)
9788 0 0 0 $nn{$_} =~ /\bCompose\s+(Compose\b|(?!key)\S+)/ or $OUT_NAMES .= qq[$_\t"$nn{$_}"\n]
9842 0 0 0 $h{'OSX_LAYOUTNAME'} ||= $h{'LAYOUTNAME'}
10174 0 0 0 @$expand < 2 or not $expand->[0] =~ /^[01]$/
10331 0 0 0 ($t = $name) =~ s/\b(LETTER\s+)E([SZN])[HG]$/$1$2/ or ($t = $name) =~ s/(?<=\bLETTER\sV\s)WITH\s+RIGHT\s+HOOK$//
0 0 0 ($t = $name) =~ s/\b(LETTER\s+)E([SZN])[HG]$/$1$2/ or ($t = $name) =~ s/(?<=\bLETTER\sV\s)WITH\s+RIGHT\s+HOOK$// or ($t = $name) =~ s/\bDOTLESS\s+J\s+WITH\s+STROKE$/J/
0 0 0 ($t = $name) =~ s/\b(LETTER\s+)E([SZN])[HG]$/$1$2/ or ($t = $name) =~ s/(?<=\bLETTER\sV\s)WITH\s+RIGHT\s+HOOK$// or ($t = $name) =~ s/\bDOTLESS\s+J\s+WITH\s+STROKE$/J/ or $name eq 'LATIN SMALL LETTER SCHWA' and $t = 'DIGIT ZERO'
10356 0 0 0 $name =~ /^(?:MATHEMATICAL\s+)?((?:(?:BLACK-LETTER|FRAKTUR|BOLD|ITALIC|SANS-SERIF|DOUBLE-STRUCK|MONOSPACE|SCRIPT)\b\s*?)+)(?=\s+(?:SMALL|CAPITAL|DIGIT|NABLA|PARTIAL|N-ARY|\w+\s+SYMBOL)\b)/ or $name =~ /^HEBREW\s+LETTER\s+(WIDE|ALTERNATIVE)\b/
0 0 0 $name =~ /^(?:MATHEMATICAL\s+)?((?:(?:BLACK-LETTER|FRAKTUR|BOLD|ITALIC|SANS-SERIF|DOUBLE-STRUCK|MONOSPACE|SCRIPT)\b\s*?)+)(?=\s+(?:SMALL|CAPITAL|DIGIT|NABLA|PARTIAL|N-ARY|\w+\s+SYMBOL)\b)/ or $name =~ /^HEBREW\s+LETTER\s+(WIDE|ALTERNATIVE)\b/ or $name =~ /^(ARABIC\s+MATHEMATICAL(?:\s+(?:INITIAL|DOTLESS|STRETCHED|LOOPED|TAILED|DOUBLE-STRUCK))?)\b/
0 0 0 $name =~ /^(?:MATHEMATICAL\s+)?((?:(?:BLACK-LETTER|FRAKTUR|BOLD|ITALIC|SANS-SERIF|DOUBLE-STRUCK|MONOSPACE|SCRIPT)\b\s*?)+)(?=\s+(?:SMALL|CAPITAL|DIGIT|NABLA|PARTIAL|N-ARY|\w+\s+SYMBOL)\b)/ or $name =~ /^HEBREW\s+LETTER\s+(WIDE|ALTERNATIVE)\b/ or $name =~ /^(ARABIC\s+MATHEMATICAL(?:\s+(?:INITIAL|DOTLESS|STRETCHED|LOOPED|TAILED|DOUBLE-STRUCK))?)\b/ or $name =~ /^(PLANCK|INFORMATION)/
10369 0 0 0 $a->[-1] eq '' or @$a == 3 and &UI::KeyboardLayout::chr(hex $a->[-2]) =~ /\W|\p{Lm}/ and not $a->[-1] =~ /^[-1]) =~ /\w/
10382 0 0 0 $k =~ /^[12]?F[89A]..$/ || hex $base >= 19968 && hex $base <= 40908
10459 0 0 0 not $N{$b} or $with =~ /smallcaps/
10545 0 0 0 $contr->[0] || $off != $#$v
10646 0 0 0 $vbell || 9834 != ord $c
10647 0 0 0 not exists $self->{'UNames'} or $verbose
10649 0 0 0 $charinfo{$c} ||= Unicode::UCD::charinfo(ord $c) || {}
10651 0 0 0 $self->{'UNames'}{$c} || $i->{'name'} || "<$c>"
10652 0 0 0 %$i || $A
10659 0 0 0 $vbell || 9834 != ord $c
10671 0 0 0 $2 || $1
10706 0 0 0 defined(my $a2 = $self->{'Compositions'}{$comp}{$C}) or @seen == 2
10710 0 0 0 @seen == 2 && $a1 || $a2
10714 0 0 0 @$r == 1 or $C eq ' '
10734 0 0 0 $_->[1] eq &UI::KeyboardLayout::lc($_->[1]) || 1 != length &UI::KeyboardLayout::lc($_->[1])
10736 0 0 0 $_->[1] eq &UI::KeyboardLayout::uc($_->[1]) || 1 != length &UI::KeyboardLayout::uc($_->[1])
10738 0 0 0 $_->[1] eq &UI::KeyboardLayout::ucfirst($_->[1]) || 1 != length &UI::KeyboardLayout::ucfirst($_->[1])
10837 0 0 0 !defined($_) || !$dupsOK && $seen{$_->[1]}++
10843 0 0 0 defined $ini_compat[$_] or $ini_compat[$_] = $compat[$_]
10940 0 0 0 defined $k->[0] || defined $k->[1]
10975 0 0 0 $penalty_group->[1] and @{[] unless $penalty_group->[1][$L];} or @{[] unless $penalty_group->[1][0];}
10994 0 0 0 $lc_ok or $uc_ok
10997 0 0 0 $found_both || $have_out eq $uc_ok
11002 0 0 0 $groupN <= $ignore_groups or defined $have_out and $have_out eq $uc_ok
11674 0 0 0 $prefix2 or $uc eq &UI::KeyboardLayout::ucfirst($lc) and $lc eq &UI::KeyboardLayout::lc($uc) and $lc ne "\337" and defined $lc1 == defined $uc1
11678 0 0 0 3 == ($_->[2] || 0) or 24 == ($_->[2] || 0)
11697 0 0 0 3 == ($_->[3][2] || 0) || 24 == ($_->[3][2] || 0)
11724 0 0 0 $opts{'cntKeys'} || $cnt
11750 0 0 0 $face0 ||= $f
11756 0 0 0 $self->{'faces'}{$f}{'layers'} || $self->export_layers($f, $f)
0 0 0 $L ||= $self->{'faces'}{$f}{'layers'} || $self->export_layers($f, $f)
11757 0 0 0 my $kmap = $self->{'faces'}{$f}{'[deadkeyFaceHexMap]'}{$self->key2hex($prefix)} or not length $prefix
12288 0 0 0 1 != length $out or 65536 <= ord $out
0 0 0 1 != length $out or 65536 <= ord $out or grep {65536 <= ord $_ unless 1 != length $_;} @in
0 0 0 1 != length $out or 65536 <= ord $out or grep {65536 <= ord $_ unless 1 != length $_;} @in or grep(($out eq $_), @in)
12309 0 0 0 length $in > $avoid_overlong_synonims_Entity * length($in[0]) or length $in > $maxEntityLen
12386 0 0 0 $v->{'[Prefix]'} || $self->key2hex($self->next_auto_dead($H))
12482 0 0 0 $v->{$_} || $vv->{$_}
12661 0 0 0 $idx > $last or not defined $lst[$idx]
12733 0 0 0 defined $AA[$i] or not +($AppleSym[$i] || '') =~ /^#(.)$/
0 0 0 defined $AA[$i] or not +($AppleSym[$i] || '') =~ /^#(.)$/ or not defined $AA[$AppleSym{$1}]
13022 0 0 0 $$override{"$l-$sh-$caps-vk=$i"} || $$override{"$l-$sh--vk=$i"}
13059 0 0 0 $M or $d > 0
13060 0 0 0 $d || $M
13090 0 0 0 $$override{"+$st0+$kk"} || $$override{"+$ST0+$kk"} || $$override{"+$st0+$KK"} || $$override{"+$ST0+$KK"} || $v0

xor 4 conditions

line l&&r l&&!r !l&&r !l&&!r condition
9328 0 0 0 0 $neg xor grep(($_ eq $deadkey), @prefix)