lib/Pod/PseudoPod.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 45 | 65 | 69.2 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
124 | 0 | 115 | 0 | !@$curr_open && @$paras && !grep(($_->[0] ne '~end'), @$paras) |
146 | 316 | 196 | 27 | @$paras == 1 and $paras->[0][0] eq '=over' || $paras->[0][0] eq '~Verbatim' || $paras->[0][0] eq '=item' |
211 | 160 | 0 | 27 | $para_type =~ /^=head\d$/s and not $self->{'accept_heads_anywhere'} |
160 | 27 | 0 | $para_type =~ /^=head\d$/s and not $self->{'accept_heads_anywhere'} and @$curr_open | |
27 | 0 | 0 | $para_type =~ /^=head\d$/s and not $self->{'accept_heads_anywhere'} and @$curr_open and $curr_open->[-1][0] eq '=over' | |
226 | 0 | 0 | 55 | $para_type =~ s/^=//s and defined($para_type = $self->{'accept_directives'}{$para_type}) |
423 | 6 | 1 | 6 | @$curr_open and $curr_open->[-1][1]{'~really'} eq '=for' |
429 | 6 | 0 | 1 | @$curr_open and $curr_open->[-1][0] eq '=for' |
450 | 0 | 0 | 43 | @$curr_open and $curr_open->[-1][0] eq '=for' |
461 | 0 | 0 | 1 | $content eq 'for' and $curr_open->[-1][1]{'~really'} eq '=for' |
517 | 0 | 15 | 13 | @$curr_open and $curr_open->[-1][0] eq '=row' |
line | l | !l | condition |
---|---|---|---|
115 | 227 | 115 | $self->{'curr_open'} ||= [] |
315 | 124 | 63 | $self->{'content_seen'} ||= 1 |
404 | 0 | 20 | $para->[1]{'~really'} ||= '=begin' |
409 | 0 | 20 | $self->{'content_seen'} ||= 1 |
486 | 41 | 0 | $self->{'content_seen'} ||= 1 |
506 | 13 | 0 | $self->{'content_seen'} ||= 1 |
518 | 13 | 0 | $self->{'content_seen'} ||= 1 |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
146 | 12 | 18 | 193 | $paras->[0][0] eq '=over' || $paras->[0][0] eq '~Verbatim' || $paras->[0][0] eq '=item' |
206 | 2 | 2 | 183 | $para_type eq '=headrow' or $para_type eq '=bodyrows' |
348 | 2 | 0 | 7 | @$para > 3 or $para->[2] |
487 | 11 | 5 | 25 | $content eq 'table' or $content eq 'sidebar' |
16 | 3 | 22 | $content eq 'table' or $content eq 'sidebar' or $content eq 'figure' | |
8 | 1 | 21 | $content eq 'table' or $content eq 'sidebar' or $content eq 'figure' or $content eq 'listing' |