Branch Coverage

blib/lib/Net/Syslogd.pm
Criterion Covered Total %
branch 0 60 0.0


line true false branch
58 0 0 if (@_ == 1) { }
64 0 0 if (/^-?localport$/i) { }
0 0 elsif (/^-?localaddr$/i) { }
0 0 elsif (/^-?family$/i) { }
0 0 elsif (/^-?timeout$/i) { }
69 0 0 if ($cfg{$_} =~ /^(?:(?:(:?ip)?v?(?:4|6))|${\2;}|$AF_INET6)$/) { }
70 0 0 if ($cfg{$_} =~ /^(?:(?:(:?ip)?v?4)|${\2;})$/) { }
73 0 0 unless ($HAVE_IO_Socket_IP)
85 0 0 if ($cfg{$_} =~ /^\d+$/) { }
97 0 0 if (my $udpserver = $class->SUPER::new(%params)) { }
116 0 0 if $key =~ /^\_.+\_$/
121 0 0 if (@_ == 1) { }
128 0 0 if (/^-?(?:max)?size$/i) { }
0 0 elsif (/^-?timeout$/i) { }
129 0 0 if ($args{$_} =~ /^\d+$/) { }
0 0 elsif ($args{$_} =~ /^rfc$/i) { }
0 0 elsif ($args{$_} =~ /^rec(?:ommend)?(?:ed)?$/i) { }
130 0 0 if ($args{$_} >= 1 and $args{$_} <= 65467)
143 0 0 if ($args{$_} =~ /^\d+$/) { }
157 0 0 if ($Timeout != 0)
163 0 0 unless (select $rout = $rin, undef, $eout = $ein, $Timeout)
170 0 0 if ($udpserver->recv($datagram, $datagramsize))
189 0 0 if ($self eq $class and $class eq 'Net::Syslogd')
195 0 0 if ($class ne 'Net::Syslogd')
232 0 0 if (@_ != 1)
236 0 0 if (/^-?data(?:gram)?$/i or /^-?pdu$/i)
240 0 0 if (/^-?regex$/i)
241 0 0 if ($args{$_} =~ /^rfc(?:3164)?$/i) { }
301 0 0 if (defined $arg and $arg >= 1) { }
311 0 0 if (defined $arg and $arg >= 1) { }