| blib/lib/WWW/Correios/PrecoPrazo.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 12 | 16 | 75.0 |
| line | true | false | branch |
|---|---|---|---|
| 73 | 3 | 1 | ref $_[0] ? : |
| 92 | 3 | 3 | ref $_[0] ? : |
| 94 | 4 | 2 | unless scalar grep(exists($$args{$_}), @REQUIRED) == @REQUIRED |
| 115 | 2 | 0 | if (my $content = $res->content) |
| 116 | 2 | 0 | if (substr($content, 0, 5) eq ' |
| 128 | 3 | 1 | unless ($ua) |
| 140 | 2 | 0 | unless $format |
| 142 | 2 | 0 | if exists $PACKAGING_FORMATS{$format} |