| blib/lib/WWW/Correios/SIGEP.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 6 | 119 | 5.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 11 | 1 | 0 | 1 | $params and ref $params eq "HASH" |
| 34 | 2 | 0 | 1 | $params and ref $params eq "HASH" |
| 50 | 0 | 0 | 0 | $params and ref $params eq "HASH" |
| 71 | 0 | 0 | 0 | $params and ref $params eq "HASH" |
| 116 | 0 | 0 | 0 | $return and not ref $return |
| 227 | 0 | 0 | 0 | defined $params->{'remetente'}{'numero'} && $params->{'remetente'}{'numero'} =~ m[\A(?:s/n|\d+)\z] |
| 239 | 0 | 0 | 0 | $valor_declarado >= "18.5" and $valor_declarado <= 3000 |
| 243 | 0 | 0 | 0 | $valor_declarado >= "18.5" and $valor_declarado <= 10000 |
| 247 | 0 | 0 | 0 | $valor_declarado > 1 and $valor_declarado <= 100 |
| 339 | 0 | 0 | 0 | defined $obj->{'destinatario'}{'numero'} && $obj->{'destinatario'}{'numero'} =~ m[\A(?:s/n|\d+)\z] |
| 0 | 0 | 0 | exists $obj->{'servicos_adicionais'} && @{$obj->{'servicos_adicionais'};} > 0 |
| line | l | !l | condition |
|---|---|---|---|
| 227 | 0 | 0 | $params->{'cartao'} || $self->{'cartao'} || die('cartao de postagem exigido') |
| 0 | 0 | $params->{'contrato'} || $self->{'contrato'} || die('contrato exigido') | |
| 0 | 0 | $params->{'diretoria'} || die('diretoria exigido') | |
| 0 | 0 | $params->{'codigo_administrativo'} || die('codigo_administrativo exigido') | |
| 0 | 0 | $params->{'remetente'}{'nome'} || die('remetente.nome exigido') | |
| 0 | 0 | $params->{'remetente'}{'logradouro'} || die('remetente.logradouro exigido') | |
| 0 | 0 | $params->{'remetente'}{'bairro'} || die('remetente.bairro exigido') | |
| 0 | 0 | $params->{'remetente'}{'cidade'} || die('remetente.cidade exigido') | |
| 0 | 0 | $params->{'remetente'}{'estado'} or die "remetente.estado (sigla) exigido" | |
| 339 | 0 | 0 | $obj->{'etiqueta'} || die('objetos[].etiqueta exigido') |
| 0 | 0 | $obj->{'codigo_postagem'} || die('objetos[].codigo_postagem exigido') | |
| 0 | 0 | $obj->{'peso'} || die('objetos[].peso em gramas exigido') | |
| 0 | 0 | substr($obj->{'destinatario'}{'nome'}, 0, 50) || die('objetos[].destinatario.nome exigido') | |
| 0 | 0 | $obj->{'destinatario'}{'logradouro'} || die('objetos[].destinatario.logradouro exigido') | |
| 0 | 0 | $obj->{'destinatario'}{'bairro'} || die('objetos[].destinatario.bairro exigido') | |
| 0 | 0 | $obj->{'destinatario'}{'cidade'} || die('objetos[].destinatario.cidade exigido') | |
| 0 | 0 | uc $obj->{'destinatario'}{'uf'} || die('objetos[].destinatario.uf exigido') | |
| 0 | 0 | $obj->{'tipo'} || die('objetos[].tipo (001, 002, 003) exigido') | |
| 0 | 0 | $obj->{'altura'} || '0' | |
| 0 | 0 | $obj->{'largura'} || '0' | |
| 0 | 0 | $obj->{'comprimento'} || '0' | |
| 0 | 0 | $obj->{'diametro'} || '0' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 36 | 2 | 1 | 0 | not $self->{'scol_obj'} or keys %$params |
| 57 | 0 | 0 | 0 | $self->{'contrato'} || $params->{'idContrato'} |
| 0 | 0 | 0 | $self->{'cartao'} || $params->{'idCartaoPostagem'} | |
| 0 | 0 | 0 | $self->{'usuario'} || $params->{'usuario'} | |
| 0 | 0 | 0 | $self->{'senha'} || $params->{'senha'} | |
| 81 | 0 | 0 | 0 | $self->{'cartao'} || $params->{'numeroCartaoPostagem'} |
| 0 | 0 | 0 | $self->{'usuario'} || $params->{'usuario'} | |
| 0 | 0 | 0 | $self->{'senha'} || $params->{'senha'} | |
| 102 | 0 | 0 | 0 | $self->{'usuario'} || $params->{'usuario'} |
| 0 | 0 | 0 | $self->{'senha'} || $params->{'senha'} | |
| 0 | 0 | 0 | $self->{'codigo'} || $params->{'codigo'} | |
| 155 | 0 | 0 | 0 | $self->{'usuario'} || $params->{'usuario'} |
| 0 | 0 | 0 | $self->{'senha'} || $params->{'senha'} | |
| 0 | 0 | 0 | $self->{'cartao'} || $params->{'cartao'} |