| line |
true |
false |
branch |
|
338
|
0 |
335 |
if ref $class
|
|
343
|
335 |
0 |
unless defined $args{'index_locations'}
|
|
352
|
1 |
334 |
unless (my $tokenizer = $tokenizer_class->new($content, %args))
|
|
365
|
1 |
333 |
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, __PACKAGE__) 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)
|