| line |
true |
false |
branch |
|
13
|
311 |
145 |
@_ == 1 ? : |
|
17
|
48 |
288 |
if (ref $value eq 'ARRAY') { } |
|
|
286 |
2 |
elsif (defined $value) { } |
|
30
|
448 |
1125 |
if (exists $self->{'charset'}) |
|
31
|
193 |
1380 |
if (defined $self->{'string'}) { } |
|
43
|
318 |
857 |
if $pairs->[$i] eq $name |
|
52
|
5 |
20 |
@_ == 1 ? : |
|
55
|
25 |
5 |
defined $value ? : |
|
63
|
71 |
4769 |
@_ > 1 ? : |
|
69
|
5 |
7616 |
if (@_) |
|
76
|
284 |
7332 |
if (defined(my $str = delete $self->{'string'})) |
|
78
|
0 |
284 |
unless length $str |
|
82
|
0 |
441 |
unless $pair =~ /^([^=]+)(?:=(.*))?$/u |
|
88
|
438 |
3 |
if $charset |
|
90
|
438 |
3 |
if $charset |
|
101
|
2473 |
35 |
unless @_ |
|
103
|
7 |
28 |
ref $_[0] eq 'ARRAY' ? : |
|
110
|
49 |
355 |
if @_ > 1 |
|
121
|
18 |
93 |
$pairs->[$i] eq $name ? : |
|
134
|
37 |
174 |
if (exists $hash{$name}) { } |
|
135
|
32 |
5 |
if ref $hash{$name} ne "ARRAY" |
|
151
|
238 |
2314 |
if (defined(my $str = $self->{'string'})) |
|
152
|
237 |
1 |
if $charset |
|
158
|
2210 |
104 |
unless @$pairs |
|
164
|
211 |
5 |
if $charset |
|
166
|
211 |
5 |
if $charset |