| blib/lib/Clustericious/Log.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 14 | 24 | 58.3 |
| line | true | false | branch |
|---|---|---|---|
| 19 | 2 | 131 | if (my $app_name = $args{'-init_logging'}) |
| 30 | 30 | 2 | if $app_name eq 'Clustericious::Log' |
| 31 | 0 | 32 | unless $app_name and $app_name ne 'Clustericious::App' |
| 34 | 0 | 32 | if $initPid and $initPid != $$ |
| 44 | 32 | 0 | if -d $_ |
| 46 | 29 | 3 | if ($l4p_dir) |
| 55 | 0 | 3 | $ENV{'LOG_FILE'} ? : |
| 29 | 3 | $l4p_dir ? : | |
| 73 | 29 | 3 | if $l4p_dir |
| 86 | 0 | 0 | unless $obj->can('filename') |
| 88 | 0 | 0 | unless my $fp = 'File::ReadBackwards'->new($filename) |
| 93 | 0 | 0 | if 0 + @lines >= $count |