| line |
true |
false |
branch |
|
26
|
9 |
6 |
$format eq 'cookie' ? : |
|
36
|
0 |
12 |
unless defined $opt->{'name'} |
|
39
|
12 |
0 |
defined $opt->{'value'} ? : |
|
41
|
0 |
12 |
defined $opt->{'path'} ? : |
|
43
|
9 |
3 |
defined $opt->{'expires'} && $opt->{'expires'} =~ /\A\d+\z/msx ? : |
|
46
|
2 |
10 |
if defined $domain |
|
48
|
9 |
3 |
if defined $expires |
|
49
|
0 |
12 |
if $opt->{'secure'} |
|
63
|
38 |
0 |
if (defined $buffer) |
|
66
|
0 |
49 |
!defined($name) ? : |
|
67
|
4 |
45 |
!defined($data) ? : |
|
81
|
0 |
2 |
if ($bdry =~ m[[^A-Za-z0-9',-./:=]]ms) |
|
99
|
6 |
10 |
unless defined $pair |
|
102
|
0 |
10 |
if $pair eq '--' |
|
103
|
4 |
6 |
unless $pair |
|
114
|
2 |
6 |
if (lc $fname eq 'content-type') |
|
117
|
6 |
2 |
if (lc $fname eq 'content-disposition') |
|
120
|
6 |
8 |
if $dispitem eq 'form-data' |
|
124
|
6 |
2 |
if ($dispfield eq 'name') |
|
127
|
2 |
6 |
if ($dispfield eq 'filename') |
|
133
|
0 |
6 |
unless defined $name |
|
134
|
0 |
6 |
unless defined $data |
|
148
|
0 |
10 |
unless defined $s |
|
149
|
2 |
8 |
if ($s =~ / \s | ' | \A\z /msx) |
|
158
|
1 |
11 |
if ($s =~ s/\A'(.*)'\z/$1/msx) |
|
170
|
19 |
3 |
unless defined $s |
|
176
|
0 |
3 |
unless $s =~ /\G\z/gmsx |
|
182
|
3 |
19 |
$w && $#{$w;} % 2 ? : |