| line |
true |
false |
branch |
|
9
|
2 |
3 |
unless @_ == 2 |
|
10
|
2 |
1 |
unless $format |
|
35
|
3 |
6 |
$element =~ /^\\\"/ ? : |
|
37
|
3 |
6 |
if ($quotes) |
|
46
|
3 |
6 |
if ($quotes) { } |
|
|
1 |
5 |
elsif ($element =~ /^%.*t$/) { } |
|
|
0 |
5 |
elsif ($element eq '%U') { } |
|
47
|
3 |
0 |
if ($element eq '%r' or $element =~ /{Referer}/ or $element =~ /{User-Agent}/) { } |
|
71
|
2 |
8 |
unless @_ == 2 |
|
72
|
1 |
7 |
unless defined $line |
|
74
|
5 |
2 |
if (my(@temp) = $line =~ /$$self{'_regex'}/) |
|
77
|
4 |
1 |
wantarray ? : |
|
91
|
1 |
1 |
if ($args{'reuse_record'}) { } |
|
94
|
2 |
3 |
if (@$record{@fields} = $_[0] =~ /$regex/) { } |
|
103
|
2 |
0 |
if (@$record{@fields} = $_[0] =~ /$regex/) { } |
|
115
|
1 |
1 |
unless @_ == 1 |
|
123
|
1 |
1 |
unless @_ == 1 |