| blib/lib/IPC/Locker.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 25 | 53 | 47.1 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 315 | 0 | 0 | 21 | $self and ref $self |
| 367 | 0 | 0 | 6 | $self and ref $self |
| 368 | 0 | 0 | 6 | $self->{'destroy_unlock'} and $self->{'pid'} |
| 0 | 0 | 6 | $self->{'destroy_unlock'} and $self->{'pid'} and $self->{'pid'} == $$ | |
| 374 | 0 | 0 | 8 | $self and ref $self |
| 415 | 2 | 0 | 0 | ref $self->{'lock'} and $#{$$self{"lock"};} < 1 |
| 505 | 9 | 2 | 2 | $self->{'autounlock'} and $cmd ne "UNLOCK" |
| 542 | 27 | 0 | 1 | $cmd eq "lock" and @args == 2 |
| 564 | 28 | 0 | 0 | $line =~ /^ECHO\s+(.*)$/ and $self->{'verbose'} |
| line | l | !l | condition |
|---|---|---|---|
| 290 | 0 | 6 | $ENV{'IPCLOCKER_HOST'} || 'localhost' |
| 295 | 0 | 2 | $ENV{'USER'} || '' |
| 409 | 0 | 0 | $self->{'owner'} || '' |
| 448 | 13 | 0 | $self->{'connect_tries'} || 1 |
| 501 | 7 | 2 | $self->{'block'} || 0 |
| 9 | 0 | $self->{'timeout'} || 0 | |
| 505 | 2 | 0 | $self->{'autounlock'} || 0 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 270 | 0 | 6 | 0 | ref $proto || $proto |
| 295 | 4 | 2 | 0 | $self->{'user'} ||= hostfqdn() . "_" . $self->{'pid'} . "_" . ($ENV{'USER'} || '') |
| 505 | 2 | 0 | 0 | $self->{'pid'} || $$ |
| 569 | 11 | 0 | 2 | $preerror || $@ |