blib/lib/Mail/Exim/MainLogParser.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 1 | 26 | 3.8 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
97 | 0 | 0 | 0 | not $line[0] =~ /^[A-Zid]{1,4}\=.+/ and $line[0] =~ /.+\@.+/ |
99 | 0 | 0 | 0 | defined $line[0] and not $line[0] =~ /^[A-Zid]{1,4}\=.+/ |
100 | 0 | 0 | 0 | !defined($l->{'flag'}) || defined $l->{'flag'} && $l->{'flag'} eq '**' and $l->{'address'} =~ /\:$/ |
115 | 0 | 0 | 0 | scalar @line >= 1 and $line[0] =~ /^\[.+\]/ || $line[0] =~ /^\(.+\)/ |
121 | 0 | 0 | 0 | defined $line[0] and not $line[0] =~ /^[A-Zid]{1,4}\=.+/ |
line | l | !l | condition |
---|---|---|---|
73 | 0 | 0 | shift() || (return undef) |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
67 | 0 | 1 | 0 | ref $class || $class |
100 | 0 | 0 | 0 | !defined($l->{'flag'}) || defined $l->{'flag'} && $l->{'flag'} eq '**' |
115 | 0 | 0 | 0 | $line[0] =~ /^\[.+\]/ || $line[0] =~ /^\(.+\)/ |