Branch Coverage

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


line true false branch
118 0 0 if (@_ == 1) { }
124 0 0 if (/^-?localport$/i) { }
0 0 elsif (/^-?localaddr$/i) { }
0 0 elsif (/^-?family$/i) { }
0 0 elsif (/^-?timeout$/i) { }
129 0 0 if ($cfg{$_} =~ /^(?:(?:(:?ip)?v?(?:4|6))|${\2;}|$AF_INET6)$/) { }
130 0 0 if ($cfg{$_} =~ /^(?:(?:(:?ip)?v?4)|${\2;})$/) { }
133 0 0 unless ($HAVE_IO_Socket_IP)
138 0 0 if ($^O ne 'MSWin32')
147 0 0 if ($cfg{$_} =~ /^\d+$/) { }
160 0 0 if (my $udpserver = $class->SUPER::new(%params)) { }
179 0 0 if $key =~ /^\_.+\_$/
184 0 0 if (@_ == 1) { }
191 0 0 if (/^-?(?:max)?size$/i) { }
0 0 elsif (/^-?timeout$/i) { }
192 0 0 if ($args{$_} =~ /^\d+$/) { }
0 0 elsif ($args{$_} =~ /^rfc$/i) { }
0 0 elsif ($args{$_} =~ /^rec(?:ommend)?(?:ed)?$/i) { }
193 0 0 if ($args{$_} >= 1 and $args{$_} <= 65467)
206 0 0 if ($args{$_} =~ /^\d+$/) { }
220 0 0 if ($Timeout != 0)
226 0 0 unless (select $rout = $rin, undef, $eout = $ein, $Timeout)
233 0 0 if ($udpserver->recv($datagram, $datagramsize))
253 0 0 if ($self eq $class and $class eq 'Net::SNMPTrapd')
259 0 0 if ($class ne 'Net::SNMPTrapd')
268 0 0 if (@_ != 1)
272 0 0 if (/^-?data(?:gram)?$/i or /^-?pdu$/i) { }
0 0 elsif (/^-?noresponse$/i) { }
276 0 0 if ($args{$_} =~ /^\d+$/ and $args{$_} > 0)
284 0 0 unless (defined($trap = $snmpasn->decode($$self{'_TRAP_'}{'datagram'})))
285 0 0 defined $snmpasn->error ? :
291 0 0 if ($$trap{'version'} > 1)
303 0 0 if ($pdutype eq 'trap') { }
0 0 elsif ($pdutype eq 'inform_request') { }
0 0 elsif ($pdutype eq 'snmpv2_trap') { }
310 0 0 if ($RESPONSE)
311 0 0 if ((my $r = _InformRequest_Response(\$self, $trap, $pdutype)) ne 'OK')
322 0 0 if ($$trap{'version'} == 0) { }
0 0 elsif ($$trap{'version'} == 1) { }
342 0 0 if (defined $$trap{'pdu_type'}{$pdutype}{'varbindlist'}[$i]{'value'}{$_}) { }
344 0 0 if ($_ eq 'ipaddr') { }
0 0 elsif ($_ eq 'null') { }
372 0 0 if (defined $arg and $arg >= 1) { }
402 0 0 if (defined $arg and $arg >= 1) { }
422 0 0 if (defined $arg and $arg >= 1) { }
469 0 0 if ($self eq $class and $class eq 'Net::SNMPTrapd')
475 0 0 if ($class ne 'Net::SNMPTrapd')
482 0 0 if (defined $$self{'_TRAP_'}{'datagram'}) { }
507 0 0 unless (defined $$$self{'_UDPSERVER_'})
514 0 0 unless (defined $buffer)
530 0 0 if ($Socket::VERSION >= 1.94) { }
532 0 0 if (length $addr == 4) { }
538 0 0 if (defined $address) { }
545 0 0 if (length $addr == 4) { }