| line |
true |
false |
branch |
|
29
|
2 |
0 |
if (my $ctx = pop @{$$self{'context'};}) |
|
38
|
113 |
102 |
if $d->can('locus') |
|
41
|
63 |
39 |
if ($d->type eq 'directive') |
|
42
|
2 |
61 |
if ($d->name eq '$PUSH$') { } |
|
|
2 |
59 |
elsif ($d->name eq '$POP$') { } |
|
43
|
2 |
0 |
if ($d->value =~ /^\"(.+)\"/) |
|
56
|
17 |
81 |
if ($d->type eq 'section') { } |
|
|
59 |
22 |
elsif ($d->type eq 'directive') { } |
|
|
10 |
12 |
elsif ($d->type eq 'blank') { } |
|
|
12 |
0 |
elsif ($d->type eq 'comment') { } |
|
59
|
0 |
59 |
if ((my $nl = $d->{'raw'} =~ tr/\n//) > 1) |
|
65
|
1 |
9 |
if ($d->{'length'} > 1) |
|
71
|
1 |
11 |
if (my $nl = ($d->value // '') =~ tr/\n//) |
|
93
|
17 |
11 |
if ($self->{'postprocess'} and @{$self->{'postprocess'};}) |
|
100
|
17 |
11 |
if ($self->lcheck($d)) |
|
103
|
17 |
0 |
if (my(@lines) = $d->locus->filelines($self->filename)) |