| blib/lib/Clustericious/Log.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 9 | 24 | 37.5 |
| line | true | false | branch |
|---|---|---|---|
| 19 | 1 | 1 | if (my $app_name = $args{-'init_logging'}) |
| 30 | 0 | 1 | if $app_name eq 'Clustericious::Log' |
| 31 | 0 | 1 | unless $app_name and $app_name ne 'Clustericious::App' |
| 34 | 0 | 1 | if $initPid and $initPid != $$ |
| 47 | 2 | 0 | if -d $_ |
| 49 | 1 | 0 | if ($l4p_dir) |
| 55 | 0 | 0 | $ENV{'LOG_FILE'} ? : |
| 1 | 0 | $l4p_dir ? : | |
| 76 | 1 | 0 | if $l4p_dir |
| 89 | 0 | 0 | unless $obj->can('filename') |
| 91 | 0 | 0 | unless my $fp = 'File::ReadBackwards'->new($filename) |
| 96 | 0 | 0 | if 0 + @lines >= $count |