Branch Coverage

blib/lib/Text/Layout.pm
Criterion Covered Total %
branch 95 212 44.8


line true false branch
442 2 6 if ($pkg eq __PACKAGE__)
444 0 2 unless (@data >= 1 and ref($data[0]) =~ /^PDF::(API2|Builder)\b/)
569 0 0 unless $self->{'_content'}
589 0 0 unless $self->{'_content'}
627 0 25 unless defined $string
645 1 1 if (exists $magstep{$k}) { }
0 1 elsif ($k =~ /^(smaller)$/) { }
0 1 elsif ($k =~ /^(larger)$/) { }
670 34 0 if ($k =~ /^([-\w]+)=(.+)$/) { }
0 0 elsif ($k eq 'strikethrough') { }
0 0 elsif ($k eq 'fallback') { }
674 34 0 unless $k =~ /^(link|href|a)$/
677 1 33 if ($k =~ /^(font|font_desc)$/) { }
1 32 elsif ($k =~ /^(face|font_face|font_family)$/) { }
2 30 elsif ($k =~ /^(size|font_size)$/) { }
9 21 elsif ($k =~ /^(style|font_style)$/) { }
10 11 elsif ($k =~ /^(weight|font_weight)$/) { }
0 11 elsif ($k =~ /^(?:font_)?(variant|stretch)$/) { }
0 11 elsif ($k =~ /^(features|background_alpha|alpha)$/) { }
0 11 elsif ($k =~ /^(foreground|fgcolor|color)$/) { }
0 11 elsif ($k =~ /^(background|bgcolor)$/) { }
2 9 elsif ($k eq 'underline' and $v =~ /^(none|single|double)$/i) { }
1 8 elsif ($k eq 'underline_color') { }
1 7 elsif ($k eq 'overline' and $v =~ /^(none|single|double)$/i) { }
1 6 elsif ($k eq 'overline_color') { }
0 6 elsif ($k eq 'rise') { }
0 6 elsif ($k eq 'baseline_shift') { }
4 2 elsif ($k eq 'strikethrough' and $v =~ /^(true|1)$/i) { }
0 2 elsif ($k eq 'strikethrough' and $v =~ /^(false|0)$/i) { }
2 0 elsif ($k eq 'strikethrough_color') { }
0 0 elsif ($k eq 'fallback') { }
0 0 elsif ($k eq 'lang') { }
0 0 elsif ($k eq 'href') { }
679 1 0 if $fcur->get_size
691 1 1 if (&$try_size($v)) { }
0 1 elsif ($v =~ /^(\d+(?:\.\d+)?)pt$/) { }
1 0 elsif ($v =~ /^\d+(?:\.\d+)?$/) { }
0 0 elsif ($v =~ /^(\d+(?:\.\d+)?)\%$/) { }
696 0 0 $self->{'_pango'} ? :
702 0 1 $self->{'_pango'} ? :
766 0 0 if ($v =~ /^(-?\d+(?:\.\d*)?)pt$/) { }
0 0 elsif (not $self->{'_pango'} and $v =~ /^(-?\d+(?:\.\d*)?)\%$/) { }
0 0 elsif (not $self->{'_pango'} and $v =~ /^(-?\d+(?:\.\d*)?)e([mx])$/) { }
773 0 0 $2 eq 'x' ? :
777 0 0 $self->{'_pango'} ? :
784 0 0 if ($v =~ /^(-?\d+(?:\.\d*)?)pt$/) { }
0 0 elsif ($v =~ /^(-?\d+(?:\.\d*)?)\%$/) { }
0 0 elsif ($v =~ /^(-?\d+(?:\.\d*)?)e([mx])$/) { }
791 0 0 $2 eq 'x' ? :
794 0 0 $self->{'_pango'} ? :
849 0 0 unless $k =~ /^(src|id)$/
851 0 0 if ($k eq 'src') { }
0 0 elsif ($k eq 'id') { }
0 0 elsif ($k =~ /^(width|height|w|h)$/) { }
0 0 elsif ($k =~ /^(x|y)$/) { }
0 0 elsif ($k eq 'border') { }
878 29 108 if ($a =~ m[^<\s*/\s*(\w+)(.*)>$]) { }
29 79 elsif ($a =~ /^<\s*([-\w]+)(.*)?>$/) { }
880 29 0 if (@stack) { }
882 29 0 if ($stack[-1][0] =~ /^<\s*$k\b/) { }
914 16 13 if (my $sc = $self->{'_sc'}{$k} // $shortcodes{$k}) { }
2 11 elsif ($k eq 'strut' and $closed) { }
11 0 elsif ($k =~ /^(span)$/) { }
0 0 elsif (my $p = $self->get_element_handler($k) and $closed) { }
923 3 2 if ($k =~ /^(w(?:idth)?|a(?:scend)?|d(?:escend)?)$/i) { }
2 0 elsif ($k =~ /^(label)$/i) { }
924 0 3 if ($v =~ /^([.\d]+)em$/) { }
0 3 elsif ($v =~ /^([.\d]+)ex$/) { }
945 2 0 $args->{'label'} ? :
977 2 27 if ($closed)
985 72 7 if defined $a and $a ne ""
1005 0 25 if (@stack)
1062 0 5 unless UNIVERSAL::isa($description, $o)
1067 5 0 if (my $sz = $description->{'size'})
1070 0 5 if ($sz > 2048)
1073 0 5 if ($self->{'_pango'})
1139 0 0 unless $self->{'_px2pu'}->($self->{'_width'})
1174 0 0 unless $self->{'_px2pu'}->($self->{'_height'})
1314 0 0 unless $self->{'_px2pu'}->($self->{'_currentindent'})
1402 0 0 unless $self->{'_currentlinespacing'}
1473 0 0 if ($align =~ /^(left|right|center)$/i) { }
1643 0 3 if (@bb > 5)
1648 1 2 $need_ink ? :
1680 0 4 if (@bb > 5)
1685 1 3 $need_ink ? :
1709 1 1 wantarray ? :
1727 1 1 wantarray ? :
1872 2 7 $all ? :
7 3 if ($self->{'_bbcache'} and @{$self->{'_bbcache'};} == ($all ? 9 : 5)) { }
1879 10 0 wantarray ? :
1885 3 2 wantarray ? :
1909 1 0 unless $self->{'_struts'}
1911 1 0 wantarray ? :
1938 0 0 unless @s2
1946 0 0 if ($d < 0) { }
0 0 elsif ($d > 0) { }
1970 0 0 unless $w
1972 0 0 unless @s1
2017 0 0 if ($conformant)
2019 0 0 unless $self->{'_pango'}
2026 0 0 if $self->{'_pango'}
2050 0 0 $self->{'_pango'} ? :
2060 0 3 unless $hd->DOES("Text::Layout::ElementRole")
2069 0 8 unless $tag
2094 2 1 ref $self ? :
2097 1 2 if ($flags{'remove'}) { }