line |
true |
false |
branch |
338
|
0 |
333 |
if ref $class |
343
|
333 |
0 |
unless defined $args{'index_locations'} |
352
|
1 |
332 |
unless (my $tokenizer = $tokenizer_class->new($content, %args)) |
365
|
1 |
331 |
if ($args{'location'}) |
367
|
0 |
1 |
unless "ARRAY" eq ref $args{'location'} |
369
|
0 |
4 |
if $args{'location'}[$inx] =~ / [^0-9] /msx |
426
|
1 |
5 |
unless __instance($content, "PPI::Element") |
429
|
2 |
3 |
if $DISABLE_CACHE |
432
|
1 |
2 |
if exists $cache{$addr} |
434
|
0 |
2 |
unless my $self = $class->new($content, %args) |
446
|
2 |
2 |
unless ref $args[0] |
448
|
3 |
1 |
if (@args) { } |
450
|
1 |
2 |
if (__instance($obj, "PPIx::Regexp") and __instance(my $parent = $obj->source, "PPI::Element")) |
487
|
1 |
2 |
unless my $re = $self->regular_expression |
524
|
58 |
68 |
unless defined(my $obj = $self->$method) |
528
|
6 |
57 |
if defined $inx |
529
|
0 |
57 |
if wantarray |
530
|
57 |
0 |
if defined wantarray |
567
|
3 |
3 |
unless $doc->find($_) |
573
|
0 |
1 |
unless $PPIx::Regexp::a->[1][0] <=> $PPIx::Regexp::b->[1][0] |
614
|
1 |
5 |
unless my $re = $self->regular_expression |
684
|
1 |
55 |
if defined $v and $v <= "5.021001" |
687
|
0 |
55 |
unless defined(my $delim = $self->delimiters) |
689
|
1 |
54 |
if "??" eq $delim and "" eq $self->type->content |
766
|
90 |
281 |
if $elem->isa($class) |