Branch Coverage

blib/lib/Net/Frame/Layer/OSPF.pm
Criterion Covered Total %
branch 6 46 13.0


line true false branch
142 0 0 if ($self->packet and $with->packet)
147 0 0 if ($s eq 'OSPF::Hello' and $w eq 'OSPF::DatabaseDesc') { }
0 0 elsif ($s eq 'OSPF::DatabaseDesc' and $w eq 'OSPF::DatabaseDesc') { }
0 0 elsif ($s eq 'OSPF::LinkStateRequest' and $w eq 'OSPF::LinkStateRequest') { }
151 0 0 if ($sHdr->flags == 7 and $wHdr->flags == 2) { }
0 0 elsif ($sHdr->flags == 3 and $wHdr->flags == 0) { }
0 0 elsif ($sHdr->flags == 1 and $wHdr->flags == 0) { }
176 0 0 if ($self->packet and not ref $self->packet) { }
0 0 elsif ($self->packet) { }
196 0 1 unless my $raw = $self->SUPER::pack('CCna4a4nnH16', $self->version, $self->type, $self->length, inetAton($self->routerId), inetAton($self->areaId), $self->checksum, $self->authType, $self->authData)
202 0 1 if ($self->packet and ref $self->packet) { }
0 1 elsif ($self->packet) { }
215 0 1 unless my($version, $type, $length, $routerId, $areaId, $checksum, $authType, $authData, $payload) = $self->SUPER::unpack('CCna4a4nnH16 a*', $self->raw)
235 0 1 if ($tail)
236 0 0 if ($type == 1) { }
0 0 elsif ($type == 2) { }
0 0 elsif ($type == 4) { }
0 0 elsif ($type == 3) { }
0 0 elsif ($type == 5) { }
253 0 1 if ($next) { }
260 0 0 if ($next->layer eq 'OSPF::Hello')
261 0 0 if ($next->options & 16)
292 0 0 if ($self->packet and ref $self->packet)