Branch Coverage

blib/lib/PDF/TextBlock.pm
Criterion Covered Total %
branch 73 96 76.0


line true false branch
239 0 27 unless (ref $pdf eq 'PDF::API2')
252 72 34 if $content_texts{$tag}
255 29 5 if ($self->fonts and $self->fonts->{$tag}) { }
0 5 elsif ($self->fonts and $self->fonts->{'default'}) { }
256 0 29 if $debug
259 0 0 if $debug
262 0 5 if $debug
275 1 26 if ($self->align eq 'text_right')
298 2 1266 if exists $width{$word}
299 83 1183 if (($tag) = $word =~ /<(.*?)>/)
300 78 5 unless ($tag =~ m[/])
301 0 78 unless ($content_texts{$tag})
313 4 1262 if ($tag and $tag =~ m[^/])
330 29 155 unless (@paragraph)
331 24 5 unless scalar @paragraphs
335 0 5 if $self->parspace
336 0 5 unless $ypos >= $self->y - $self->h
348 0 160 if ($first_line and defined $self->hang) { }
0 160 elsif ($first_line and defined $self->flindent) { }
0 160 elsif ($first_paragraph and defined $self->fpindent) { }
0 160 elsif (defined $self->indent) { }
356 0 0 if $first_paragraph
382 122 38 if ($self->align eq 'fulljustify' or $self->align eq 'justify' and @paragraph) { }
385 0 122 if (scalar @line == 1)
392 14 24 $self->align eq 'justify' ? :
399 132 28 if ($align eq 'justify' or grep /<.*>/, @line) { }
402 3 129 if ($align eq 'center') { }
3 126 elsif ($align eq 'right') { }
411 83 1009 if (($tag) = $word =~ /<(.*?)>/)
413 1 82 if ($tag =~ /^href[a-z]?/) { }
78 4 elsif (not $tag =~ m[/]) { }
415 1 0 if ref $content_texts{$tag}
423 0 1092 if $debug
426 6 1086 if ($href) { }
436 1 5 if ($word =~ m[
451 0 1092 unless ($width{$word})
452 0 0 if $debug
455 1092 0 if @line
457 80 1012 if ($word =~ m[/])
458 1 79 if ($word =~ m[/href[a-z]?])
461 79 1 unless ($href)
469 4 24 if ($align eq 'right') { }
6 18 elsif ($align eq 'center') { }
475 0 28 if $debug
486 2 24 if scalar @paragraph
540 34 182 unless defined $self->$att
544 4 23 unless (defined $self->page)
549 2 25 unless (defined $self->text)