Branch Coverage

blib/lib/Log/Log4perl/Appender/Graylog.pm
Criterion Covered Total %
branch 3 4 75.0


line true false branch
55 0 2 unless my $socket = 'IO::Socket::INET'->new('PeerAddr', $socket_opts->{'host'}, 'PeerPort', $socket_opts->{'port'}, 'Proto', $socket_opts->{'protocol'})
79 1 1 if $self->{'Gzip'}