Condition Coverage

blib/lib/WWW/Correios/SIGEP.pm
Criterion Covered Total %
condition 6 119 5.0


and 3 conditions

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
332 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

or 2 conditions

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"
332 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'

or 3 conditions

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'}
248 0 0 0 $obj->{'codigo_postagem_sigla'} eq "CARTA" or $obj->{'codigo_postagem_sigla'} eq "MINI"