line |
true |
false |
branch |
209
|
1 |
0 |
if (ref $ar_r eq 'ARRAY') { } |
|
0 |
0 |
elsif (ref $ar_r eq 'HASH') { } |
217
|
1 |
0 |
if $next |
258
|
1 |
0 |
unless (defined $token) |
264
|
1 |
1 |
if (ref $val eq 'ARRAY') { } |
266
|
0 |
2 |
if (ref $key eq 'ARRAY') { } |
297
|
1 |
3 |
unless $first_child |
306
|
0 |
3 |
if ($t->children_count) { } |
325
|
0 |
0 |
if (ref $token->{'pod_pat'} eq 'Regexp') |
332
|
0 |
0 |
defined $token->get_pod_pattern ? : |
333
|
0 |
0 |
defined $pat && defined $pat->[0] ? : |
353
|
0 |
1 |
unless open $out, '>', \$h_value |
369
|
0 |
0 |
if ($file) { } |
371
|
0 |
0 |
unless open $fh, '>', $file |
392
|
0 |
1 |
if scalar @array == 1 |
401
|
1 |
0 |
if ($token->get_key eq 'doc_Document_end_') { } |
402
|
0 |
1 |
unless $token->previous->line_end |
405
|
0 |
0 |
unless $token->line_end |
412
|
0 |
3 |
if $token->children_count |
423
|
3 |
0 |
if ($self->{'output_as_hash'}) |
432
|
0 |
3 |
unless open $out, '>', \$h_value |
438
|
1 |
0 |
if $self->{'output_as_hash'} |
455
|
1 |
8 |
unless $mytoken->line_end |
465
|
0 |
0 |
$token ? : |
472
|
0 |
0 |
unless $token->line_end |
481
|
15 |
51 |
unless defined $attr_hr->{'start_line'} |
489
|
2 |
49 |
$token->key_needed ? : |
|
51 |
0 |
$token ? : |
499
|
2 |
49 |
if ($token->is_pod_matching($e_name)) |
508
|
2 |
0 |
if $token->previous->line_end == 0 |
514
|
2 |
49 |
if ($token->key_needed and $key) { } |
516
|
2 |
0 |
if ($token->is_key_matching($key)) { } |
520
|
0 |
2 |
unless $tp->line_end |
537
|
14 |
35 |
if ($e_name =~ /^head/i) |
541
|
0 |
14 |
unless $tp->line_end |
557
|
0 |
0 |
unless defined $attr_hr->{'start_line'} |
558
|
0 |
0 |
unless $token |
568
|
0 |
0 |
defined $token ? : |
|
0 |
0 |
$self->{'doc'}->key_needed ? : |
571
|
0 |
0 |
if ($self->{'doc'}->is_pod_matching($e_name)) |
576
|
0 |
0 |
if ($token->previous) { } |
577
|
0 |
0 |
if $token->previous->line_end == 0 |
588
|
0 |
0 |
$self->{'doc'}->key_needed ? : |
|
0 |
0 |
defined $key ? : |
592
|
0 |
0 |
if ($self->{'doc'}->key_needed and $key) { } |
596
|
0 |
0 |
if ($self->{'doc'}->is_key_matching($key)) { } |
600
|
0 |
0 |
if ($token->previous) { } |
601
|
0 |
0 |
unless $token->previous->line_end |
621
|
0 |
0 |
unless $token->line_end |
641
|
0 |
0 |
unless $token->line_end |
648
|
0 |
0 |
if ($e_name =~ /^head/i) |
650
|
0 |
0 |
if ($token->previous) { } |
654
|
0 |
0 |
unless $token->previous->line_end |
669
|
0 |
66 |
unless $token |
670
|
2 |
64 |
if ($token->key_needed) |
678
|
0 |
0 |
if ($self->{'doc'}->key_needed) |
720
|
3 |
1 |
if ($parent) { } |
766
|
0 |
4 |
if (ref $pod_dir eq 'ARRAY') { } |
784
|
1 |
2 |
unless scalar @{$self->{'children'};} |
794
|
3 |
67 |
if ($v) |
797
|
70 |
0 |
if $self->{'previous'} |
802
|
3 |
7 |
if ($v) |
815
|
9 |
1 |
if $self->{'next'} |
824
|
0 |
4 |
unless $self->children_count |
829
|
3 |
1 |
if ($index < @{$self->{'children'};}) { } |
834
|
0 |
1 |
if $self->{'parent'} |
845
|
2 |
6 |
if ($pos) |
855
|
3 |
57 |
if ($pos) |
880
|
0 |
51 |
unless $el |
882
|
51 |
0 |
if ($self->{'pod_pat'}) |
886
|
2 |
49 |
if ($el =~ /\b$p\b/) |
902
|
0 |
2 |
unless $el |
909
|
2 |
0 |
if ($el =~ /\b$p\b/) |
910
|
0 |
2 |
unless $self->{'key'} |
927
|
0 |
168 |
if defined $v |
934
|
0 |
0 |
if (ref $self->{'key_pat'}) { } |