Branch Coverage

lib/Net/Statsite/Client.pm
Criterion Covered Total %
branch 9 22 40.9


line true false branch
48 2 0 unless defined $options{'host'}
49 1 1 unless defined $options{'port'}
50 2 0 unless defined $options{'prefix'}
55 0 2 unless my $sock = 'IO::Socket::INET'->new('PeerAddr', $options{'host'}, 'PeerPort', $options{'port'}, 'Proto', 'udp')
102 2 3 unless defined $delta
104 1 4 if (ref $stats eq 'ARRAY') { }
148 0 0 unless defined $sample_rate
151 0 0 if (defined $sample_rate and $sample_rate < 1) { }
153 0 0 if rand() <= $sample_rate
160 0 0 unless keys %$sampled_data
168 0 0 if ($self->{'prefix'})