Branch Coverage

blib/lib/Perl6/Perldoc/To/Ansi.pm
Criterion Covered Total %
branch 0 82 0.0


line true false branch
21 0 0 if $text =~ /^\e\[/ and $text =~ /\e\[0?m$/
43 0 0 if ($match eq "\n") { }
0 0 elsif (my($add) = $match =~ /\e\[OPEN(.+?)m/) { }
0 0 elsif (my($remove) = $match =~ /\e\[CLOSE(.+?)m/) { }
58 0 0 if ($code_stack[$i] eq $remove)
59 0 0 if $code_stack[$i]
88 0 0 if (($$internal_state{'note_count'} || 0) > 0)
109 0 0 if (my $nesting = $self->option('nested')) { }
0 0 elsif (not defined $depth) { }
127 0 0 unless defined $content
128 0 0 if (ref $content) { }
212 0 0 if $next < $min
304 0 0 if (defined $number)
325 0 0 if (defined $number)
346 0 0 if (defined $number)
367 0 0 if (defined $number)
402 0 0 $counter ? :
406 0 0 if (my $term = $self->term)
408 0 0 if (length $counter)
456 0 0 unless @title
564 0 0 unless @title
663 0 0 if (my $BR_count = $is_break_entity{$spec})
667 0 0 if ($spec =~ /\A \d/msx)
669 0 0 unless ($spec =~ s/\A 0o/0/msx)
678 0 0 if (my $replacement = $is_translatable{$spec}) { }
735 0 0 $self->has_distinct_text ? :
741 0 0 if ($target =~ s/\A (?:doc:\s*)? [#] //msx)
743 0 0 defined $text ? :
748 0 0 if ($target =~ s/\A doc: //msx)
750 0 0 defined $text ? :
755 0 0 if ($target =~ s/\A man: //msx)
757 0 0 defined $text ? :
762 0 0 if ($target =~ s/\A (?:defn) : //msx)
764 0 0 defined $text ? :
769 0 0 if ($target =~ s/\A (?:mailto) : //msx)
771 0 0 defined $text ? :
777 0 0 defined $text ? :
822 0 0 if ($target =~ s/\A (?:doc:\s*)? [#] //msx)
827 0 0 if ($target =~ s/\A doc: //msx)
832 0 0 if ($target =~ s/\A man: //msx)
837 0 0 if ($target =~ s/\A toc: //msx)