Branch Coverage

blib/lib/Net/Frame/Layer/SNMP.pm
Criterion Covered Total %
branch 30 80 37.5


line true false branch
335 0 0 if ($sPduType == 0 || $sPduType == 1 || $sPduType == 3 || $sPduType == 5 || $sPduType == 6 and $wPduType == 2 and $sReqId == $wReqId)
362 1 0 if ($self->pdu_type == 0 or $self->pdu_type == 1 or $self->pdu_type == 2 or $self->pdu_type == 3 or $self->pdu_type == 6 or $self->pdu_type == 7 or $self->pdu_type == 8) { }
0 0 elsif ($self->pdu_type == 4) { }
0 0 elsif ($self->pdu_type == 5) { }
381 0 1 if (defined $snmpasn->error)
387 0 0 if ($self->agentAddr =~ /:/) { }
406 0 0 if (defined $snmpasn->error)
423 0 0 if (defined $snmpasn->error)
436 0 1 if (defined $snmpasn->error)
445 1 0 if ($self->pdu_type == 0 or $self->pdu_type == 1 or $self->pdu_type == 2 or $self->pdu_type == 3 or $self->pdu_type == 6 or $self->pdu_type == 7 or $self->pdu_type == 8) { }
0 0 elsif ($self->pdu_type == 4) { }
0 0 elsif ($self->pdu_type == 5) { }
476 0 1 if $self->nextLayer
478 0 1 if ($self->payload)
494 11 4 if ($self->pdu_type == 0 or $self->pdu_type == 1 or $self->pdu_type == 2 or $self->pdu_type == 3 or $self->pdu_type == 6 or $self->pdu_type == 7 or $self->pdu_type == 8) { }
2 2 elsif ($self->pdu_type == 4) { }
2 0 elsif ($self->pdu_type == 5) { }
505 0 11 if ($self->varbindlist != 0)
509 0 0 if ($valueType eq 'ipaddr') { }
0 0 elsif ($valueType eq 'null') { }
0 0 elsif ($varbind->{'value'}{$valueType} =~ /[\x00-\x1f\x7f-\xff]/s) { }
527 0 2 if ($self->varbindlist != 0)
531 0 0 if ($valueType eq 'ipaddr') { }
0 0 elsif ($valueType eq 'null') { }
0 0 elsif ($varbind->{'value'}{$valueType} =~ /[\x00-\x1f\x7f-\xff]/s) { }
547 0 2 if ($self->varbindlist != 0)
551 0 0 if ($valueType eq 'ipaddr') { }
0 0 elsif ($valueType eq 'null') { }
0 0 elsif ($varbind->{'value'}{$valueType} =~ /[\x00-\x1f\x7f-\xff]/s) { }
577 0 11 if (@_ == 1) { }
582 11 22 if (/^-?oid$/i) { }
11 11 elsif (/^-?type$/i) { }
11 0 elsif (/^-?value$/i) { }
585 11 0 if (defined $VARBINDTYPES[$cfg{$_}]) { }
597 1 10 if ($params{'type'} eq 'ipaddr')
601 1 10 if ($params{'type'} eq 'null')
622 0 1 if (@_ == 1) { }
627 1 1 if (/^-?oid$/i) { }
1 0 elsif (/^-?time(?:ticks)?$/i) { }
658 1 0 if (length $addr == 4) { }