Branch Coverage

blib/lib/Net/Frame/Layer/Syslog.pm
Criterion Covered Total %
branch 26 46 56.5


line true false branch
142 0 0 if (defined $self->msg) { }
163 1 2 if (defined $self->msg) { }
164 0 1 unless $raw = $self->SUPER::pack('a*', $self->msg)
170 0 2 unless $raw = $self->SUPER::pack('a*', '<' . $priority . '>' . $self->timestamp . ' ' . $self->host . ' ' . $self->tag . ' ' . $self->content)
190 0 1 unless my($payload) = $self->SUPER::unpack('a*', $self->raw)
198 1 0 if ($payload =~ /$Cregex/) { }
219 2 1 if ($chars{$ch} > 0)
223 1 0 if ($chars{$win} > 0) { }
249 0 1 if $self->nextLayer
252 0 1 if ($self->payload)
265 2 1 if (defined $self->facility and defined $self->severity)
266 2 0 defined $FACILITY[$self->facility] ? :
2 0 defined $SEVERITY[$self->severity] ? :
274 1 2 if (not defined $self->content) { }
296 0 3 unless defined $sev
303 0 3 unless defined $pri
307 1 2 if (defined $flag) { }
317 0 4 $time[3] < 10 ? :
0 4 $time[2] < 10 ? :
0 4 $time[1] < 10 ? :
0 4 $time[0] < 10 ? :
333 4 0 if ($name =~ m[.+/(.+)]) { }
0 0 elsif ($name =~ /.+\\(.+)/) { }