| blib/lib/App/Padadoy.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 12 | 65 | 18.4 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 96 | 1 | 0 | 0 | $self->{'remote'} and not $self->{'remote'} =~ qr"^[^\@]+\@[^:]+:[~/].*$" |
| 107 | 0 | 1 | 0 | $module and not $module =~ /^([a-z][a-z0-9]*(::[a-z][a-z0-9]*)*)$/i |
| 322 | 0 | 0 | 0 | $self->{'pidfile'} and -f $self->{'pidfile'} |
| 361 | 0 | 0 | 0 | $pid and $pid eq $pid2 |
| 0 | 0 | 0 | not $pid and $user | |
| 0 | 0 | 0 | not $pid and $user and $user eq $self->{'user'} |
| line | l | !l | condition |
|---|---|---|---|
| 68 | 0 | 0 | $2 // '' |
| 84 | 0 | 1 | $self->{'port'} ||= 6000 |
| 246 | 11 | 0 | $self->{$_} // '' |
| 323 | 0 | 0 | read_file($self->{'pidfile'}) || 0 |
| 385 | 0 | 0 | $revision ||= 'master' |
| 434 | 0 | 0 | shift() || 'master' |
| 504 | 0 | 0 | $App::Padadoy::VERSION || '??' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 81 | 0 | 1 | 0 | getlogin || getpwuid $< |
| 0 | 1 | 0 | $self->{'user'} ||= getlogin || getpwuid $< | |
| 82 | 0 | 1 | 0 | $self->{'base'} ||= cwd() |
| 83 | 0 | 1 | 0 | $self->{'repository'} ||= catdir($self->{'base'}, 'repository') |
| 85 | 0 | 1 | 0 | $self->{'pidfile'} ||= catfile($self->{'base'}, 'starman.pid') |
| 86 | 0 | 1 | 0 | $self->{'logs'} ||= catdir($self->{'base'}, 'logs') |
| 87 | 0 | 1 | 0 | $self->{'errorlog'} ||= catfile($self->{'logs'}, 'error.log') |
| 88 | 0 | 1 | 0 | $self->{'accesslog'} ||= catfile($self->{'logs'}, 'access.log') |
| 354 | 0 | 0 | 0 | not $pid2 or $f[1] < $pid2 |
| 360 | 0 | 0 | 0 | $sock or $pid2 |
| 386 | 0 | 0 | 0 | $directory ||= catdir($self->{'base'}, $revision) |