| blib/lib/DDLock/Client.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 7 | 24 | 29.1 |
| line | true | false | branch |
|---|---|---|---|
| 75 | 0 | 3 | if $sock and getpeername $sock |
| 91 | 0 | 0 | if (@_) |
| 93 | 0 | 0 | if ($Debug) { } |
| 112 | 0 | 0 | unless $Debug >= $level |
| 125 | 1 | 0 | unless ref $self |
| 126 | 0 | 1 | unless not exists $args{'servers'} or ref $args{'servers'} eq 'ARRAY' |
| 141 | 0 | 0 | if (@_) { } |
| 152 | 0 | 6 | if (my $hook = $$self{'hooks'}{$hookname}) |
| 155 | 0 | 0 | if $@ |
| 172 | 3 | 0 | if (@{$$self{'servers'};}) { } |
| 184 | 3 | 0 | unless ($lock) |
| 187 | 3 | 0 | if $eval_error |