| 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)) |
| 170 | 1 | 4 | $opts{'block'} ? : |
| 172 | 0 | 5 | unless $lock |
| 190 | 10 | 5 | unless my $lock = delete $lock{&ident($self)} |