Branch Coverage

blib/lib/Net/SIP/Blocker.pm

Criterion	Covered	Total	%
branch	8	14	57.1

line	true	false	branch
31	0	2	unless my $map = delete $args{'block'}
34	0	2	unless ($code, my $msg) = $code =~ /^(\d\d\d)(?:\s+(.+))?$/
36	0	2	defined $msg ? :
40	0	2	unless $self->{'dispatcher'} = delete $args{'dispatcher'}
57	0	2	unless $packet->is_request
60	1	1	if ($method eq 'ACK' and my $block = $self->{'block'}{'INVITE'})
65	0	1	unless my $block = $self->{'block'}{$method}