| line |
true |
false |
branch |
|
32
|
0 |
0 |
if (defined $$self{'is_dst_switch_last_hour'} and $$self{'is_dst_switch_last_hour'} == $$t[3] << 5 + $$t[2]) |
|
43
|
0 |
0 |
if ($$t[2] == 23) |
|
52
|
0 |
0 |
if ($time_plus_1h - $time > 4000) { } |
|
71
|
22 |
9 |
if (defined $lastmin and $$lastmin[0] == $_[1] and $$lastmin[1] == $_[2] and $$lastmin[2] == $_[3] and $$lastmin[3] == $_[4] and $$lastmin[4] == $_[5]) |
|
83
|
6 |
34 |
if ($GMT) { } |
|
101
|
0 |
28 |
if (not $GMT || defined $$self{'dst_comp'} and defined $$self{'last_time'} and $$self{'last_time'} - $time > 1200 and $$self{'last_time'} - $time < 3600) |
|
107
|
0 |
0 |
if ($off) |
|
112
|
0 |
40 |
if (defined $$self{'dst_comp_until'} and $time > $$self{'dst_comp_until'}) |
|
128
|
0 |
0 |
unless setlocale(2, $locale) |
|
140
|
0 |
7 |
unless defined $file |
|
141
|
0 |
7 |
unless %data |
|
142
|
0 |
7 |
unless (defined $data{'year'}) |
|
145
|
6 |
1 |
unless defined $data{'type'} |
|
148
|
0 |
7 |
if (UNIVERSAL::isa($file, 'IO::Handle')) { } |
|
|
0 |
7 |
elsif (UNIVERSAL::isa($file, 'File::Tail')) { } |
|
|
7 |
0 |
elsif (not ref $file) { } |
|
156
|
0 |
7 |
if ($file eq '-') { } |
|
162
|
0 |
7 |
unless defined $data{'file'} |
|
169
|
0 |
7 |
if (defined $data{'locale'}) |
|
170
|
0 |
0 |
if (ref $data{'locale'} eq 'ARRAY') { } |
|
|
0 |
0 |
elsif (ref $data{'locale'} eq '') { } |
|
189
|
7 |
55 |
if ($mon == 0) { } |
|
|
3 |
52 |
elsif ($mon == 11) { } |
|
190
|
3 |
4 |
if defined $$self{'_last_mon'} and $$self{'_last_mon'} == 11 |
|
194
|
1 |
2 |
if ($$self{'enable_year_decrement'}) |
|
195
|
1 |
0 |
if defined $$self{'_last_mon'} and $$self{'_last_mon'} != 11 |
|
209
|
0 |
69 |
if (defined $$self{'filetail'}) { } |
|
240
|
0 |
59 |
unless ($str =~ /^
(\S{3})\s+(\d+) # date -- 1, 2
\s
(\d+):(\d+):(\d+) # time -- 3, 4, 5
(?:\s<\w+\.\w+>)? # FreeBSD's verbose-mode
\s
([-\w\.\@:]+) # host -- 6
\s+
(?:\[LOG_[A-Z]+\]\s+)? # FreeBSD
(.*) # text -- 7
$/x) |
|
246
|
0 |
59 |
unless defined $mon |
|
252
|
59 |
0 |
unless ($$self{'allow_future'}) |
|
254
|
0 |
59 |
if ($time - time > 86400) |
|
263
|
14 |
45 |
if ($text =~ /^(?:last message repeated|above message repeats) (\d+) time/) |
|
264
|
0 |
14 |
if defined $$self{'repeat'} and not $$self{'repeat'} |
|
265
|
2 |
12 |
unless defined $$self{'_last_data'}{$host} |
|
266
|
0 |
12 |
unless ($1 > 0) |
|
276
|
1 |
44 |
if $text eq '-- MARK --' |
|
293
|
0 |
44 |
unless ($text =~ /^
([^:]+?) # program -- 1
(?:\[(\d+)\])? # PID -- 2
:\s+
(?:\[ID\ (\d+)\ ([a-z0-9]+)\.([a-z]+)\]\ )? # Solaris 8 "message id" -- 3, 4, 5
(.*) # text -- 6
$/x) |
|
298
|
0 |
44 |
if ($$self{'arrayref'}) { } |
|
340
|
0 |
3 |
unless ($str =~ /^
(\S{3})\s+(\d+) # date -- 1, 2
\s
(\d+):(\d+):(\d+) # time -- 3, 4, 5
# host is not logged
\s+
(.*) # text -- 6
$/x) |
|
346
|
0 |
3 |
unless defined $mon |
|
361
|
0 |
3 |
unless ($text =~ /^
\[(.*?)\] # program -- 1
# no PID
\s+
(.*) # text -- 2
$/x) |
|
366
|
0 |
3 |
if ($$self{'arrayref'}) { } |
|
390
|
146 |
4 |
if ($$self{'type'} eq 'syslog') { } |
|
|
4 |
0 |
elsif ($$self{'type'} eq 'metalog') { } |