| line |
!l |
l&&!r |
l&&r |
condition |
|
129
|
735 |
7 |
0 |
exists $args{'default_modifiers'} and "ARRAY" ne ref $args{'default_modifiers'} |
|
322
|
5823 |
4 |
317 |
$char eq "\\" and $finish ne "\\" |
|
|
5544 |
282 |
1 |
$bracketed and $char eq $start |
|
349
|
489 |
0 |
3778 |
defined $-[$inx] and defined $+[$inx] |
|
850
|
88 |
9 |
5 |
$loc->{'tab_width'} > 1 and $content =~ / \t /msx |
|
888
|
382 |
8 |
141 |
$type and not $next_white |
|
|
390 |
139 |
2 |
$type and not $next_white and $delim_start =~ / \A \w \z /msx |
|
1125
|
16 |
0 |
2 |
$character eq "\\" and $self->{'cursor_limit'} - $self->{'cursor_curr'} > 1 |
|
1142
|
4 |
0 |
5 |
$character eq "\\" and defined(my $next = $self->peek(1)) |
| line |
l |
!l&&r |
!l&&!r |
condition |
|
296
|
49 |
540 |
0 |
(my $bracketed = $self->close_bracket($start)) || $start |
|
386
|
4116 |
17 |
0 |
caller eq __PACKAGE__ or $self->{'cursor_curr'} > $self->{'cursor_orig'} |
|
568
|
0 |
0 |
0 |
ref $self->{'prior_significant_token'} || $self->{'prior_significant_token'} |
|
820
|
93 |
12 |
0 |
$self->{'_location'} ||= do {
my(%loc) = ("location", $self->{'location'});
if (__instance($self->{'source'}, "PPI::Element")) {
$loc{'location'} ||= $self->{'source'}->location;
if (my $doc = $self->{'source'}->document) {
$loc{'tab_width'} = $doc->tab_width;
};
};
$loc{'tab_width'} ||= 1;
\%loc
} |
|
825
|
0 |
11 |
0 |
$loc{'location'} ||= $self->{'source'}->location |
|
885
|
149 |
382 |
6 |
$type or $delim_start =~ m[ \A [/?] \z ]msx |
|
1113
|
27 |
0 |
0 |
__PACKAGE__->can('__PPIX_TOKEN_FALLBACK__' . $mode) || __PACKAGE__->can('__PPIX_TOKEN_FALLBACK__regexp') || confess("Programming error - unable to find fallback for $mode") |
|
1145
|
5 |
0 |
0 |
$self->interpolates or $next eq "'" |
|
|
5 |
0 |
0 |
$self->interpolates or $next eq "'" or $next eq "\\" |