| blib/lib/PDF/TextBlock.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 27 | 35 | 77.1 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 258 | 0 | 5 | 29 | $self->fonts and $self->fonts->{$tag} |
| 0 | 5 | 0 | $self->fonts and $self->fonts->{'default'} | |
| 316 | 1183 | 79 | 4 | $tag and $tag =~ m[^/] |
| 351 | 129 | 31 | 0 | $first_line and defined $self->hang |
| 129 | 31 | 0 | $first_line and defined $self->flindent | |
| 5 | 155 | 0 | $first_paragraph and defined $self->fpindent | |
| 372 | 29 | 131 | 1237 | @paragraph and $line_width + scalar(@line) * $space_width + $width{$paragraph[0]} < $self->w |
| 385 | 24 | 14 | 115 | $self->align eq 'justify' and @paragraph |
| line | l | !l | condition |
|---|---|---|---|
| 517 | 1 | 9 | $words ||= 100 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 241 | 0 | 27 | 0 | ref $pdf eq 'PDF::API2' or ref $pdf eq 'PDF::Builder' |
| 385 | 7 | 115 | 38 | $self->align eq 'fulljustify' or $self->align eq 'justify' and @paragraph |
| 402 | 122 | 10 | 28 | $align eq 'justify' or grep /<.*>/, @line |