blib/lib/PkgForge/PidFile.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 0 | 18 | 0.0 |
line | true | false | branch |
---|---|---|---|
70 | 0 | 0 | if ($self->does_file_exist) |
73 | 0 | 0 | unless my $fh = 'IO::File'->new($file, 'r') |
78 | 0 | 0 | if ($contents =~ /^(\d+)/) { } |
86 | 0 | 0 | unless defined $pid |
105 | 0 | 0 | unless my $fh = 'IO::File'->new($file, 193, $self->mode) |
107 | 0 | 0 | unless flock $fh, 6 |
109 | 0 | 0 | unless $fh->close |
126 | 0 | 0 | if (-d "/proc/$pid") { } |
137 | 0 | 0 | if ($self->does_file_exist) { } |