line |
true |
false |
branch |
9
|
2 |
3 |
unless @_ == 2 |
10
|
2 |
1 |
unless $format |
43
|
3 |
6 |
if ($quoted) |
52
|
3 |
6 |
if ($quoted) { } |
|
1 |
5 |
elsif ($element =~ /^%.*t$/) { } |
|
0 |
5 |
elsif ($element eq '%U') { } |
53
|
3 |
0 |
if ($element eq '%r' or $element =~ /{Referer}/ or $element =~ /{User-Agent}/) { } |
70
|
8 |
1 |
if ($i < $#format_elements) |
72
|
1 |
7 |
if ($quoted and quoted_p($next_element)) { } |
87
|
2 |
8 |
unless @_ == 2 |
88
|
1 |
7 |
unless defined $line |
90
|
5 |
2 |
if (my(@temp) = $line =~ /$self->{'_regex'}/) |
93
|
4 |
1 |
wantarray ? : |
107
|
1 |
1 |
if ($args{'reuse_record'}) { } |
110
|
3 |
4 |
if (@$record{@fields} = $_[0] =~ /$regex/) { } |
119
|
2 |
0 |
if (@$record{@fields} = $_[0] =~ /$regex/) { } |
131
|
1 |
1 |
unless @_ == 1 |
139
|
1 |
1 |
unless @_ == 1 |