| 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) |