Branch Coverage

blib/lib/Net/SNMPTrapd.pm
Criterion Covered Total %
branch 0 108 0.0


line true false branch
117 0 0 if (@_ == 1) { }
123 0 0 if (/^-?localport$/i) { }
0 0 elsif (/^-?localaddr$/i) { }
0 0 elsif (/^-?family$/i) { }
0 0 elsif (/^-?timeout$/i) { }
128 0 0 if ($cfg{$_} =~ /^(?:(?:(:?ip)?v?(?:4|6))|${\2;}|$AF_INET6)$/) { }
129 0 0 if ($cfg{$_} =~ /^(?:(?:(:?ip)?v?4)|${\2;})$/) { }
132 0 0 unless ($HAVE_IO_Socket_IP)
137 0 0 if ($^O ne 'MSWin32')
146 0 0 if ($cfg{$_} =~ /^\d+$/) { }
159 0 0 if (my $udpserver = $class->SUPER::new(%params)) { }
178 0 0 if $key =~ /^\_.+\_$/
183 0 0 if (@_ == 1) { }
190 0 0 if (/^-?(?:max)?size$/i) { }
0 0 elsif (/^-?timeout$/i) { }
191 0 0 if ($args{$_} =~ /^\d+$/) { }
0 0 elsif ($args{$_} =~ /^rfc$/i) { }
0 0 elsif ($args{$_} =~ /^rec(?:ommend)?(?:ed)?$/i) { }
192 0 0 if ($args{$_} >= 1 and $args{$_} <= 65467)
205 0 0 if ($args{$_} =~ /^\d+$/) { }
219 0 0 if ($Timeout != 0)
225 0 0 unless (select $rout = $rin, undef, $eout = $ein, $Timeout)
232 0 0 if ($udpserver->recv($datagram, $datagramsize))
252 0 0 if ($self eq $class and $class eq 'Net::SNMPTrapd')
258 0 0 if ($class ne 'Net::SNMPTrapd')
267 0 0 if (@_ != 1)
271 0 0 if (/^-?data(?:gram)?$/i or /^-?pdu$/i) { }
0 0 elsif (/^-?noresponse$/i) { }
275 0 0 if ($args{$_} =~ /^\d+$/ and $args{$_} > 0)
283 0 0 unless (defined($trap = $snmpasn->decode($$self{'_TRAP_'}{'datagram'})))
284 0 0 defined $snmpasn->error ? :
290 0 0 if ($$trap{'version'} > 1)
302 0 0 if ($pdutype eq 'trap') { }
0 0 elsif ($pdutype eq 'inform_request') { }
0 0 elsif ($pdutype eq 'snmpv2_trap') { }
309 0 0 if ($RESPONSE)
310 0 0 if ((my $r = _InformRequest_Response(\$self, $trap, $pdutype)) ne 'OK')
321 0 0 if ($$trap{'version'} == 0) { }
0 0 elsif ($$trap{'version'} == 1) { }
341 0 0 if (defined $$trap{'pdu_type'}{$pdutype}{'varbindlist'}[$i]{'value'}{$_}) { }
343 0 0 if ($_ eq 'ipaddr') { }
0 0 elsif ($_ eq 'null') { }
371 0 0 if (defined $arg and $arg >= 1) { }
401 0 0 if (defined $arg and $arg >= 1) { }
421 0 0 if (defined $arg and $arg >= 1) { }
468 0 0 if ($self eq $class and $class eq 'Net::SNMPTrapd')
474 0 0 if ($class ne 'Net::SNMPTrapd')
481 0 0 if (defined $$self{'_TRAP_'}{'datagram'}) { }
506 0 0 unless (defined $$$self{'_UDPSERVER_'})
513 0 0 unless (defined $buffer)
529 0 0 if ($Socket::VERSION >= 1.94) { }
531 0 0 if (length $addr == 4) { }
537 0 0 if (defined $address) { }
544 0 0 if (length $addr == 4) { }