lib/Pod/PseudoPod.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 44 | 65 | 67.6 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
124 | 0 | 115 | 0 | !@$curr_open && @$paras && !grep(($$_[0] ne '~end'), @$paras) |
146 | 316 | 223 | 0 | @$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' |