Branch Coverage

blib/lib/Email/Fingerprint/Cache/AnyDBM.pm

Criterion	Covered	Total	%
branch	20	24	83.3

line	true	false	branch
86	1	8	unless $file
92	0	8	unless ($self->is_open)
110	1	8	unless $self->is_open
125	0	34	unless defined $hash and ref $hash eq 'HASH'
126	14	20	unless tied %{$hash;}
138	2	5	defined $lock{ident $self} ? :
154	1	6	if exists $lock{ident $self}
156	1	5	unless defined $file{ident $self}
162	0	5	unless (-w dirname($file))
168	1	4	$opts{'block'} ? :
172	0	5	unless $lock
190	10	5	unless my $lock = delete $lock{ident $self}