| blib/lib/WWW/Correios/PrecoPrazo.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 14 | 18 | 77.7 |
| line | true | false | branch |
|---|---|---|---|
| 73 | 4 | 1 | ref $_[0] ? : |
| 102 | 6 | 6 | ref $_[0] ? : |
| 104 | 8 | 4 | unless scalar grep(exists($$args{$_}), @REQUIRED) == @REQUIRED |
| 131 | 6 | 0 | if (my $content = $res->content) |
| 132 | 6 | 0 | if (substr($content, 0, 5) eq ' |
| 137 | 7 | 2 | if (exists $data{'Erro'} and $inner_content =~ m( |
| 156 | 3 | 2 | unless ($ua) |
| 168 | 4 | 0 | unless $format |
| 170 | 4 | 0 | if exists $PACKAGING_FORMATS{$format} |