Branch Coverage

blib/lib/PPrint.pm
Criterion Covered Total %
branch 34 48 70.8


line true false branch
27 0 4 if $radix < 1
29 0 4 if $mincol < 0
30 1 3 defined $$params[2] ? :
38 1 3 if ($$flags{':'})
40 4 0 if defined $_
42 1 3 if $num < 0
43 1 3 if $num > 0 and defined $$flags{';'}
44 2 2 if (length $str < $mincol)
46 0 2 if ($$flags{'!'}) { }
89 0 0 unless defined $indent_style
117 1 2 if ($type)
118 0 1 if ($type eq 'm') { }
0 1 elsif ($type eq 'u') { }
1 0 elsif ($type eq 'd') { }
132 1 2 unless defined $join_char
133 2 1 unless defined $pre_char
134 2 1 unless defined $post_char
147 0 4 if ($radix == 0)
151 0 4 if ($radix < 0)
196 1 12 if ($directive_string =~ s/((?
201 1 12 if (grep {$_ eq 'v';} @params) { }
207 1 0 if ($_ eq 'v') { }
233 13 0 if (/$directive_regexp/) { }
247 0 13 if (ref $control eq 'CODE') { }