| line |
true |
false |
branch |
|
81
|
1 |
10 |
if ref $opt ne 'HASH' |
|
117
|
2 |
47 |
if ref $opt ne 'HASH' |
|
120
|
1 |
166 |
unless (exists {add_hostname => 0, add_pid => 1, add_timestamp => 1, facility => 8, fh => \undef, hostname => 'bdbae84f1884', ident => '00.load.t', level => 'DEBUG', path => '/dev/log', pid => 731, prefix => '', type => 'fh'}->{$key}) |
|
127
|
14 |
31 |
if ($self->{'type'} eq 'unix') |
|
139
|
52 |
2 |
if (defined $level) |
|
140
|
2 |
50 |
unless (exists {DEBUG => 7, ERR => 3, INFO => 6, NOTICE => 5, WARN => 4}->{$level}) |
|
152
|
17 |
1 |
if (defined $ident) |
|
163
|
0 |
14 |
unless socket $self->{'_sock'}, 1, 2, 0 |
|
164
|
0 |
14 |
unless connect $self->{'_sock'}, sockaddr_un($self->{'path'}) |
|
171
|
3 |
14 |
if ($self->{'add_timestamp'}) |
|
175
|
3 |
14 |
if ($self->{'add_hostname'}) |
|
181
|
4 |
13 |
if ($self->{'add_pid'}) |
|
199
|
236 |
14 |
$is_active ? : |
|
225
|
20 |
206 |
if ($feature{'S'}) { } |
|
|
20 |
186 |
elsif ($feature{'D'} or $feature{'T'} or $feature{'timestamp'}) { } |
|
237
|
25 |
201 |
if ($feature{'D'} or $feature{'T'}) |
|
247
|
15 |
211 |
if ($feature{'timestamp'}) |
|
259
|
30 |
435 |
if ($pfx eq '%L') { } |
|
|
25 |
410 |
elsif ($pfx eq '%S') { } |
|
|
25 |
385 |
elsif ($pfx eq '%D') { } |
|
|
25 |
360 |
elsif ($pfx eq '%T') { } |
|
|
30 |
330 |
elsif ($pfx eq '%P') { } |
|
|
30 |
300 |
elsif ($pfx eq '%F') { } |
|
|
30 |
270 |
elsif ($pfx eq '%_') { } |
|
|
25 |
245 |
elsif ($pfx eq '%%') { } |
|
309
|
155 |
71 |
if ($self->{'type'} eq 'fh') { } |
|
|
70 |
1 |
elsif ($self->{'type'} eq 'unix') { } |
|
335
|
0 |
0 |
ref $_ eq 'CODE' ? : |
|
|
2 |
0 |
@_ == 1 ? : |
|
|
0 |
2 |
unless print {$self->{'fh'};} $prefix, $msg, "\n" |
|
|
0 |
0 |
ref $_ eq 'CODE' ? : |
|
|
1 |
0 |
@_ == 1 ? : |
|
|
0 |
1 |
unless print {$self->{'fh'};} $prefix, $msg, "\n" |
|
|
0 |
0 |
ref $_ eq 'CODE' ? : |
|
|
4 |
0 |
@_ == 1 ? : |
|
|
0 |
4 |
unless print {$self->{'fh'};} $prefix, $msg, "\n" |
|
|
0 |
0 |
ref $_ eq 'CODE' ? : |
|
|
3 |
0 |
@_ == 1 ? : |
|
|
1 |
1 |
unless print {$self->{'fh'};} $prefix, $msg, "\n" |
|
|
0 |
0 |
ref $_ eq 'CODE' ? : |
|
|
31 |
0 |
@_ == 1 ? : |
|
|
0 |
31 |
unless print {$self->{'fh'};} $prefix, $msg, "\n" |
|
|
0 |
0 |
ref $_ eq 'CODE' ? : |
|
|
0 |
0 |
@_ == 1 ? : |
|
|
0 |
0 |
unless print {$self->{'fh'};} $prefix, $msg, "\n" |
|
|
0 |
0 |
ref $_ eq 'CODE' ? : |
|
|
0 |
0 |
@_ == 1 ? : |
|
|
0 |
0 |
unless print {$self->{'fh'};} $prefix, $msg, "\n" |
|
|
0 |
0 |
ref $_ eq 'CODE' ? : |
|
|
1 |
0 |
@_ == 1 ? : |
|
|
0 |
0 |
unless print {$self->{'fh'};} $prefix, $msg, "\n" |
|
|
0 |
0 |
ref $_ eq 'CODE' ? : |
|
|
1 |
0 |
@_ == 1 ? : |
|
|
1 |
0 |
unless print {$self->{'fh'};} $prefix, $msg, "\n" |
|
|
0 |
1 |
ref $_ eq 'CODE' ? : |
|
|
0 |
0 |
@_ == 1 ? : |
|
|
0 |
1 |
unless print {$self->{'fh'};} $prefix, $msg, "\n" |
|
|
0 |
0 |
ref $_ eq 'CODE' ? : |
|
|
0 |
0 |
@_ == 1 ? : |
|
|
0 |
0 |
unless print {$self->{'fh'};} $prefix, $msg, "\n" |
|
|
0 |
0 |
ref $_ eq 'CODE' ? : |
|
|
0 |
0 |
@_ == 1 ? : |
|
|
0 |
0 |
unless print {$self->{'fh'};} $prefix, $msg, "\n" |
|
|
0 |
0 |
ref $_ eq 'CODE' ? : |
|
|
0 |
0 |
@_ == 1 ? : |
|
|
0 |
0 |
unless print {$self->{'fh'};} $prefix, $msg, "\n" |
|
|
0 |
0 |
ref $_ eq 'CODE' ? : |
|
|
0 |
0 |
@_ == 1 ? : |
|
|
0 |
0 |
unless print {$self->{'fh'};} $prefix, $msg, "\n" |
|
|
0 |
0 |
ref $_ eq 'CODE' ? : |
|
|
0 |
0 |
@_ == 1 ? : |
|
|
0 |
0 |
unless print {$self->{'fh'};} $prefix, $msg, "\n" |