line |
!l |
l&&!r |
l&&r |
condition |
114
|
0 |
0 |
0 |
$char ge 'a' and $char le 'z' |
|
0 |
0 |
0 |
$char ge '0' and $char le '9' |
490
|
0 |
0 |
0 |
$repeat and $capture |
553
|
0 |
0 |
0 |
$sigil and $sigil eq '@' || $sigil eq '%' |
1430
|
0 |
0 |
0 |
warn qq[Cannot interpolate raw string "$pat" as pattern\n] and exit 1 |
1445
|
0 |
0 |
0 |
length $mod > 5 and substr($mod, 0, 4) eq 'nth(' |
|
0 |
0 |
0 |
length $mod > 5 and substr($mod, 0, 4) eq 'nth(' and substr($mod, -1) eq ')' |
|
0 |
0 |
0 |
length $mod > 2 and substr($mod, 0, 1) ne 'n' |
|
0 |
0 |
0 |
length $mod > 2 and substr($mod, 0, 1) ne 'n' and substr($mod, -2) eq 'th' || substr($mod, -2) eq 'st' || substr($mod, -2) eq 'nd' || substr($mod, -2) eq 'rd' |
|
0 |
0 |
0 |
length $mod > 3 and substr($mod, 0, 2) eq 'x(' |
|
0 |
0 |
0 |
length $mod > 3 and substr($mod, 0, 2) eq 'x(' and substr($mod, -1) eq ')' |
|
0 |
0 |
0 |
length $mod > 1 and substr($mod, -1) eq 'x' |
1765
|
0 |
0 |
0 |
exists $mod{'nth'} && ($mod{'post'}{'g'} || $mod{'post'}{'gc'}) |
|
0 |
0 |
0 |
exists $mod{'rep'} && $type eq 'm' |
|
0 |
0 |
0 |
exists $mod{'rep'} && $type eq 's' |
1779
|
0 |
0 |
0 |
exists $mod{'rep'} and $mod{'post'}{'g'} || $mod{'post'}{'gc'} |
1782
|
0 |
0 |
0 |
$repcontrol and $type eq 's' |
|
0 |
0 |
0 |
$repcontrol and $type eq 's' and not $mod{'post'}{'gc'} |
1784
|
0 |
0 |
0 |
exists $mod{'rep'} && $type eq 'm' |
1787
|
0 |
0 |
0 |
$repcontrol && $type eq 'm' |
1791
|
0 |
0 |
0 |
exists $mod{'nth'} and $type ne 'm' |
|
0 |
0 |
0 |
exists $mod{'nth'} and $type ne 'm' and $type ne 's' |
1793
|
0 |
0 |
0 |
exists $mod{'rep'} and $type ne 'm' |
|
0 |
0 |
0 |
exists $mod{'rep'} and $type ne 'm' and $type ne 's' |
1836
|
0 |
0 |
0 |
$from_s >= 0 and $to >= 0 |
|
0 |
0 |
0 |
$from_l >= 0 and $to >= 0 |
1863
|
0 |
0 |
0 |
$arrayref and @$arrayref |
1921
|
0 |
0 |
0 |
$overlap and $exhaust ne 'done' |
|
0 |
0 |
0 |
$overlap and $exhaust ne 'done' and $Perl6::Rules::startpos <= $Perl6::Rules::lastpos |
1927
|
0 |
0 |
0 |
$sigil eq '@' and $subsigil eq '?' |
|
0 |
0 |
0 |
$sigil eq '%' and $subsigil eq '?' |
line |
l |
!l&&r |
!l&&!r |
condition |
114
|
0 |
0 |
0 |
$char ge 'a' and $char le 'z' or $char ge '0' and $char le '9' |
|
0 |
0 |
0 |
$char ge 'a' and $char le 'z' or $char ge '0' and $char le '9' or $char eq '_' |
123
|
0 |
0 |
0 |
$follow2 eq '.{' or $follow2 eq '.[' |
174
|
0 |
0 |
0 |
($special = index($var, '[')) > 0 or ($special = index($var, '{')) > 0 |
234
|
0 |
0 |
0 |
($special = index($var, '[')) > 0 or ($special = index($var, '{')) > 0 |
553
|
0 |
0 |
0 |
$sigil eq '@' || $sigil eq '%' |
597
|
0 |
0 |
0 |
$sigil eq '@' or $sigil eq '%' |
718
|
0 |
0 |
0 |
$sigil eq '@' or $sigil eq '%' |
1445
|
0 |
0 |
0 |
$mod eq 'words' or $mod eq 'w' |
|
0 |
0 |
0 |
$mod eq 'globally' or $mod eq 'g' |
|
0 |
0 |
0 |
$mod eq 'exhaustive' or $mod eq 'e' |
|
0 |
0 |
0 |
$mod eq 'overlap' or $mod eq 'o' |
|
0 |
0 |
0 |
$mod eq 'ignore' or $mod eq 'i' |
|
0 |
0 |
0 |
$mod eq 'cont' or $mod eq 'c' |
|
0 |
0 |
0 |
substr($mod, -2) eq 'th' || substr($mod, -2) eq 'st' || substr($mod, -2) eq 'nd' || substr($mod, -2) eq 'rd' |
|
0 |
0 |
0 |
substr($mod, 0, 3) eq 'nth' or substr($mod, 0, 1) eq 'x' |
1611
|
0 |
0 |
0 |
$stdprop{$name} || "\\p{$name}" |
1757
|
0 |
0 |
0 |
$name ||= "anon_$type" |
1779
|
0 |
0 |
0 |
$mod{'post'}{'g'} || $mod{'post'}{'gc'} |
1807
|
0 |
0 |
0 |
$mod{'exhaust'} || $mod{'overlap'} |
1816
|
0 |
0 |
0 |
$translate or $bad |