| blib/lib/SVG/Barcode/UPCA.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 12 | 14 | 85.7 |
| line | true | false | branch |
|---|---|---|---|
| 40 | 150 | 110 | if (@line) |
| 46 | 155 | 320 | if ($code->[$x] eq $sign) { } |
| 65 | 255 | elsif ($code->[$x] eq $signlong) { } | |
| 47 | 55 | 100 | if (@line) { } |
| 54 | 15 | 50 | if (@line) { } |
| 67 | 0 | 5 | unless $self->{'plotter'} ||= "GD::Barcode::UPCA"->new($text) |
| 89 | 0 | 3 | if $size == 0 |