line |
true |
false |
branch |
22
|
0 |
1 |
unless $logdir |
23
|
0 |
1 |
unless -d $logdir |
43
|
0 |
0 |
unless ($fh) |
45
|
0 |
0 |
unless my $logdir = logdir() |
48
|
0 |
0 |
unless ($fh = open_file('>>', $logfile)) |
61
|
0 |
0 |
unless ref $fh and $fh->opened |
63
|
0 |
0 |
unless flock $fh, 2 |
65
|
0 |
0 |
unless seek $fh, 0, 2 |
67
|
0 |
0 |
unless $fh->print($self->format_message($level, $message)) |
69
|
0 |
0 |
unless flock $fh, 8 |
75
|
1 |
0 |
if (my $altpath = setting('log_path')) |
81
|
0 |
0 |
if ($logroot and not -d $logroot and not mkdir($logroot)) |
86
|
0 |
0 |
$logroot ? : |
90
|
0 |
0 |
if -d $expected_path and -x _ and -w _ |
92
|
0 |
0 |
unless (-w $logroot and -x _) |
95
|
0 |
0 |
unless (-w $logroot and -x _) |