| line |
!l |
l&&!r |
l&&r |
condition |
|
128
|
732 |
7 |
0 |
exists $args{'default_modifiers'} and "ARRAY" ne ref $args{'default_modifiers'} |
|
321
|
5801 |
4 |
317 |
$char eq "\\" and $finish ne "\\" |
|
|
5522 |
282 |
1 |
$bracketed and $char eq $start |
|
348
|
489 |
0 |
3758 |
defined $-[$inx] and defined $+[$inx] |
|
849
|
88 |
9 |
5 |
$loc->{'tab_width'} > 1 and $content =~ / \t /msx |
|
887
|
382 |
8 |
138 |
$type and not $next_white |
|
|
390 |
136 |
2 |
$type and not $next_white and $delim_start =~ / \A \w \z /msx |
|
1124
|
16 |
0 |
2 |
$character eq "\\" and $self->{'cursor_limit'} - $self->{'cursor_curr'} > 1 |
|
1141
|
4 |
0 |
5 |
$character eq "\\" and defined(my $next = $self->peek(1)) |
| line |
l |
!l&&r |
!l&&!r |
condition |
|
295
|
49 |
534 |
0 |
(my $bracketed = $self->close_bracket($start)) || $start |
|
385
|
4097 |
17 |
0 |
caller eq "PPIx::Regexp::Tokenizer" or $self->{'cursor_curr'} > $self->{'cursor_orig'} |
|
567
|
0 |
0 |
0 |
ref $self->{'prior_significant_token'} || $self->{'prior_significant_token'} |
|
819
|
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
} |
|
824
|
0 |
11 |
0 |
$loc{'location'} ||= $self->{'source'}->location |
|
884
|
146 |
382 |
6 |
$type or $delim_start =~ m[ \A [/?] \z ]msx |
|
1112
|
27 |
0 |
0 |
'PPIx::Regexp::Tokenizer'->can('__PPIX_TOKEN_FALLBACK__' . $mode) || 'PPIx::Regexp::Tokenizer'->can('__PPIX_TOKEN_FALLBACK__regexp') || confess("Programming error - unable to find fallback for $mode") |
|
1144
|
5 |
0 |
0 |
$self->interpolates or $next eq "'" |
|
|
5 |
0 |
0 |
$self->interpolates or $next eq "'" or $next eq "\\" |