Branch Coverage

blib/lib/Net/GrowlClient.pm
Criterion Covered Total %
branch 2 18 11.1


line true false branch
65 0 1 unless $$self{'CLIENT_SKIP_REGISTER'}
75 0 1 unless $$self{'CLIENT_SOCKET'} = 'IO::Socket::INET'->new('PeerPort', $$self{'CLIENT_PEER_PORT'} || '9887', 'PeerHost', $$self{'CLIENT_PEER_HOST'} || 'localhost', 'Proto', 'udp', 'Type', 2, 'ReuseAddr', 1)
124 0 0 if ($$self{'CLIENT_TYPE_REGISTRATION'} eq '0') { }
0 0 elsif ($$self{'CLIENT_TYPE_REGISTRATION'} eq '2') { }
172 0 0 if ($notify_args{'priority'} and grep /^$notify_args{'priority'}$/, keys %priority) { }
179 0 0 if $notify_args{'priority'}
195 0 0 if ($$self{'CLIENT_TYPE_NOTIFICATION'} eq '1') { }
0 0 elsif ($$self{'CLIENT_TYPE_NOTIFICATION'} eq '3') { }
228 0 0 unless $$self{'CLIENT_SOCKET'}->send($packet)