| line |
true |
false |
branch |
|
75
|
0 |
15 |
unless ($line =~ /^\d{4}\-\d{2}-\d{2}\s\d{2}\:\d{2}\:\d{2}( [\-\+]\d{4})?/o) |
|
83
|
0 |
15 |
unless scalar @line >= 3 |
|
90
|
1 |
14 |
if ($line[0] =~ /\+\d{4}/) |
|
97
|
4 |
11 |
if ($line[0] =~ /\[\d+\]/) |
|
102
|
13 |
2 |
if ($line[0] =~ /[a-zA-Z0-9]{6}\-[a-zA-Z0-9]{6}\-[a-zA-Z0-9]{2}/) { } |
|
109
|
7 |
8 |
if ($line[0] =~ /\<\=|\(\=|\=\>|\-\>|\>\>|\*\>|\*\*|\=\=/) { } |
|
116
|
0 |
15 |
if !scalar(@line) >= 1 |
|
121
|
9 |
6 |
if (not exists $l->{'flag'} && defined $l->{'flag'} or $l->{'flag'} eq '**') { } |
|
123
|
7 |
2 |
if (not $line[0] =~ /^[A-Zid]{1,4}\=.*/ or $line[0] =~ /^([A-Zid]{1,4})\=.*/ and not exists $Mail::Exim::MainLogParser::EXIM_FIELD_IDENFIERS{$1}) |
|
126
|
18 |
7 |
if defined $l->{'message'} |
|
145
|
0 |
6 |
if defined $l->{'address'} |
|
150
|
7 |
8 |
if !scalar(@line) >= 1 |
|
156
|
30 |
0 |
if ($line[0] =~ /^([A-Zid]{1,4})\=(.*)/ and exists $Mail::Exim::MainLogParser::EXIM_FIELD_IDENFIERS{$1}) { } |
|
174
|
0 |
8 |
if (scalar @line >= 1) |
|
183
|
0 |
15 |
unless ref $parsed eq 'HASH' |
|
189
|
15 |
0 |
if exists $parsed->{'date'} |
|
190
|
15 |
0 |
if exists $parsed->{'time'} |
|
191
|
1 |
14 |
if exists $parsed->{'timezone'} |
|
192
|
4 |
11 |
if exists $parsed->{'pid'} |
|
193
|
13 |
2 |
if exists $parsed->{'eximid'} |
|
194
|
7 |
8 |
if exists $parsed->{'flag'} |
|
195
|
6 |
9 |
if exists $parsed->{'address'} |
|
196
|
8 |
7 |
if @s_args >= 1 |
|
197
|
7 |
8 |
if exists $parsed->{'message'} |