| line |
!l |
l&&!r |
l&&r |
condition |
|
133
|
0 |
0 |
79 |
defined $tmpl and UNIVERSAL::isa($tmpl, $pack->Template) |
|
297
|
7 |
5 |
380 |
$part->{'toks'} and @{$part->{'toks'};} |
|
343
|
217 |
53 |
350 |
not $+{'attname'} and $+{'bare'} |
|
|
53 |
1 |
349 |
not $+{'attname'} and $+{'bare'} and is_ident($+{'bare'}) |
|
360
|
147 |
18 |
92 |
!$quote && is_ident($value) |
|
399
|
10 |
0 |
368 |
@$chunks && !ref($chunks->[0]) |
|
416
|
372 |
336 |
10 |
@$chunks and ref $chunks->[0] |
|
455
|
10 |
0 |
16 |
@$list and $list->[-1] =~ /^\s*$/s |
|
512
|
7 |
0 |
86 |
@_ and $_[0] |
|
|
0 |
76 |
10 |
@_ and $_[0] and $_[0][0] == 8 |
|
|
76 |
7 |
3 |
@_ and $_[0] and $_[0][0] == 8 and not defined $_[0][4] |
|
585
|
0 |
0 |
457 |
ref $self->{'cf_namespace'} && wantarray |
|
594
|
244 |
91 |
151 |
$tmpl->{'partlist'} and my YATT::Lite::Core::Part $prev = $tmpl->{'partlist'}[-1] |
|
733
|
0 |
0 |
1 |
$argSpec->[0] == 8 and ($attName) = $argSpec->[5] =~ /^-(\w+)$/ |
|
833
|
0 |
377 |
235 |
defined $_[0] and length $_[0] |
| line |
l |
!l&&r |
!l&&!r |
condition |
|
64
|
0 |
457 |
0 |
$self->{'re_name'} ||= $self->re_name |
|
65
|
0 |
457 |
0 |
$self->{'re_decl'} ||= qr/$nspat(?::\w++)+)
|(?:--\#(?$nspat(?::\w++)*)))\b/sx |
|
84
|
0 |
457 |
0 |
$self->{'re_att'} ||= qr#(?\s++)
| (?--+.*?--+)
| (?%(?:[\w\:\.]+(?:[\w:\.\-=\[\]\{\}\(,\)]+)?);)
| (?:(?[\w:]+)\s*=\s*+)?+
(?:'(?[^']*+)'
|"(?[^\"]*+)"
|(?\[) | (?\])
|$entOpen
|(?[^\s'\"<>\[\]/=]++)
)
#sx |
|
95
|
0 |
457 |
0 |
$self->{'re_body'} ||= qr"$entOpen
|<(?:(?/?)(?:?)(?$nspat(?::\w++)+)
|\?(?$nspat(?::\w++)*))\b
"sx |
|
101
|
0 |
457 |
0 |
$self->{'re_eopen'} ||= qr/(? [\(\{\[])/sx |
|
102
|
0 |
457 |
0 |
$self->{'re_eclose'} ||= qr/(? [\)\}\]])/sx |
|
103
|
0 |
457 |
0 |
$self->{'re_evar'} ||= qr/: (?\w+)/sx |
|
104
|
0 |
457 |
0 |
$self->{'ch_etext'} ||= qr/(?: [^\ \t\n,;:()\[\]{}])/sx |
|
105
|
0 |
457 |
0 |
$self->{'re_eparen'} ||= qr/(\( (? (?: (?> [^()]+) | (?-2) )*) \) )/sx |
|
241
|
2 |
33 |
0 |
$nameAtt->[4] // $self->location2name($nameAtt->[5]) |
|
258
|
92 |
11 |
0 |
&$sub($self, $tmpl, $ns, $self->parse_attlist($str, 1)) // $part |
|
338
|
638 |
5 |
633 |
$+{'ws'} or $+{'comment'} |
|
343
|
1 |
0 |
257 |
$+{'entity'} or $+{'special'} |
|
563
|
19 |
19 |
0 |
$self->{'subroutes'} //= $self->SubRoutes->new |
|
621
|
0 |
0 |
0 |
$desc->[4] || $desc->[5] |
|
647
|
12 |
0 |
0 |
$desc->[4] || $desc->[5] |
|
770
|
0 |
1 |
0 |
$new[0] ||= $orig->[0] |