Condition Coverage

blib/lib/Pod/Simple/BlackBox.pm
Criterion Covered Total %
condition 132 189 69.8


and 3 conditions

line !l l&&!r l&&r condition
208 1848 690 15592 not $self->{'parse_characters'} || $self->{'encoding'} and $self->{'in_pod'} || $line =~ /^=/s
690 15571 21 not $self->{'parse_characters'} || $self->{'encoding'} and $self->{'in_pod'} || $line =~ /^=/s and $line =~ /$non_ascii_re/
391 0 6 0 $cs_re and $copy =~ /$cs_re/
392 0 6 0 $cn_re and $copy =~ /$cn_re/
393 0 6 0 $cn_re and $copy =~ /$cn_re/
402 0 5 1 $rare_blocks_re and $copy =~ /$rare_blocks_re/
407 0 5 0 $later_latin_re and $copy =~ /$later_latin_re/
408 0 5 0 $later_latin_re and $copy =~ /$later_latin_re/
530 0 5704 24 defined $1 and $1 =~ /[^\S\r\n]/
535 1 0 5727 not $self->{'start_of_pod_block'} and @$paras
1 5096 631 not $self->{'start_of_pod_block'} and @$paras and $paras->[-1][0] eq '~Verbatim'
551 837 1983 33 $2 and $2 ne ' '
565 0 0 715 not $self->{'start_of_pod_block'} and @$paras
0 542 173 not $self->{'start_of_pod_block'} and @$paras and $paras->[-1][0] eq '~Verbatim'
624 0 54 0 do { '???'; $self->{'encoding'} = $e; 1 } and $e eq 'HACKRAW'
755 848 0 40 $self->{'errata'} and keys %{$$self{'errata'};}
842 0 871 31 !@$curr_open && @$paras && !grep(($_->[0] ne '~end'), @$paras)
872 3604 1162 4209 @$paras == 1 and $paras->[0][0] eq '=over' || $paras->[0][0] eq '=item' || $paras->[0][0] eq '~Verbatim' && $self->{'in_pod'}
947 4432 0 742 $para_type =~ /^=head\d$/s and not $self->{'accept_heads_anywhere'}
4432 736 6 $para_type =~ /^=head\d$/s and not $self->{'accept_heads_anywhere'} and @$curr_open
736 0 6 $para_type =~ /^=head\d$/s and not $self->{'accept_heads_anywhere'} and @$curr_open and $curr_open->[-1][0] eq '=over'
962 0 12 737 $para_type =~ s/^=//s and defined($para_type = $self->{'accept_directives'}{$para_type})
965 0 0 1022 @$curr_open and $over = (grep {$_->[0] eq '=over';} @$curr_open)[-1]
1220 5 201 4926 $seen_legal_directive and not $self->{'~tried_gen_errata'}
1367 0 0 0 @$curr_open && $curr_open->[-1][0] eq '=for'
1385 0 0 130 @$curr_open and $curr_open->[-1][0] eq '=for'
1556 0 0 209 @$curr_open and $curr_open->[-1][0] eq '=over'
1578 0 0 0 @$curr_open and $over = (grep {$_->[0] eq '=over';} @$curr_open)[-1]
1749 1382 3161 3 @$para == 3 and $para->[2] eq ''
1778 432 9 10 $indent and ref $indent eq 'CODE'
1808 0 430 102 $self->{'accept_codes'} and $self->{'accept_codes'}{'VerbatimFormatted'}
1811 49 53 75 @$para > 3 and not $para->[-1] =~ /\S/
1852 7561 2401 1167 @_ and not ref $_[0]
1953 0 0 10 length $formatting and $$p[$i - 1] =~ /\S/
2179 2404 656 18 $self->{'_output_is_for_JustPod'} and $bracket_count > 1
2213 115 0 3 $3 ne ' ' and $self->{'_output_is_for_JustPod'}
2245 64 40 2952 @stack and not $stack[-1]
2323 3604 0 380 ref($lol->[$i] || '') and UNIVERSAL::isa($lol->[$i], 'ARRAY')
2376 458 0 26 /^-?(?:[123456789]\d*|0)(?:\.\d+)?$/s and $_ ne '-0'

or 2 conditions

line l !l condition
121 8569 902 $self->{'line_count'} ||= 0
132 8569 902 $self->{'paras'} ||= []
137 8216 1255 $self->{'pod_para_count'} ||= 0
831 5383 902 $self->{'curr_open'} ||= []
1220 4120 806 $self->{'content_seen'} ||= 1
1334 50 77 $para->[1]{'~really'} ||= '=begin'
1335 40 87 !$dont_ignore || 0
1336 66 61 $to_resolve || 0
1345 40 87 not $dont_ignore or scalar grep($_->[1]{'~ignore'}, @$curr_open)
1348 76 11 $self->{'content_seen'} ||= 1
1416 87 0 $self->{'content_seen'} ||= 1
1538 120 49 $self->{'content_seen'} ||= 1
1560 169 0 $self->{'content_seen'} ||= 1
2323 3900 84 $lol->[$i] || ''
2342 4 0 $_->[1]{'~really'} || '=over'

or 3 conditions

line l !l&&r !l&&!r condition
208 11 1837 16282 $self->{'parse_characters'} || $self->{'encoding'}
14653 939 690 $self->{'in_pod'} || $line =~ /^=/s
356 0 0 0 $b_ord < $min_cont or $b_ord > 191
540 1 94 5633 $self->{'start_of_pod_block'} or $self->{'last_was_blank'}
872 1139 3201 1031 $paras->[0][0] eq '=over' || $paras->[0][0] eq '=item' || $paras->[0][0] eq '~Verbatim' && $self->{'in_pod'}
1006 3 1 0 $item_type eq 'number' or $item_type eq 'bullet'
1619 0 0 0 $item_type eq 'number' or $item_type eq 'bullet'
1749 0 3 4543 @$para == 2 or @$para == 3 and $para->[2] eq ''
3 102 4441 @$para == 2 or @$para == 3 and $para->[2] eq '' or $para->[1]{'~cooked'}
1773 1 1 449 not defined $self->expand_verbatim_tabs or $self->expand_verbatim_tabs =~ /\D/
2006 0 0 0 ref $p->[$i] or ref $$p[$i + 1]
2055 2 865 3576 $preserve_space or $self->{'preserve_whitespace'}
2376 57 1 534 ref $_ eq 'ARRAY' or ref $_ eq 'Pod::Simple::LinkSection'
0 0 484 $_ eq '0' or /^-?(?:[123456789]\d*|0)(?:\.\d+)?$/s and $_ ne '-0'