| line |
true |
false |
branch |
|
46
|
10 |
4 |
if @_ |
|
67
|
0 |
14 |
unless @_ |
|
75
|
7 |
7 |
if (@_ == 1 and ref $_[0]) { } |
|
|
1 |
6 |
elsif (ref $_[0] eq 'ARRAY') { } |
|
|
6 |
0 |
elsif (int(@_) % 2 == 0) { } |
|
123
|
2 |
1 |
unless $#uri > 0 |
|
130
|
1 |
2 |
unless $ref eq 'HASH' || $ref eq ref $self and defined $value->{$key} |
|
155
|
4 |
3 |
unless ($last_idx > 0) |
|
165
|
6 |
3 |
if ($i < $last_idx) { } |
|
167
|
2 |
4 |
unless ref $value->{$key} eq 'HASH' |
|
186
|
45 |
3 |
ref $ref ? : |
|
196
|
3 |
45 |
unless $self->exists($name) |
|
200
|
18 |
27 |
unless $#uri > 0 |
|
206
|
79 |
0 |
if ($ref eq 'HASH' or $ref eq ref $self) { } |
|
228
|
6 |
109 |
unless $r eq 'HASH' || $r eq ref $self and exists $value->{$key} |
|
252
|
1 |
0 |
unless defined $key |
|
257
|
0 |
0 |
unless $uri[0] =~ /\S+/ |
|
264
|
0 |
0 |
if ($ref eq 'HASH' or $ref eq ref $self) { } |
|
272
|
0 |
0 |
if ($i == $last_idx) |
|
274
|
0 |
0 |
ref $value eq 'HASH' ? : |
|
296
|
2 |
0 |
unless defined $key |
|
301
|
0 |
0 |
unless $uri[0] =~ /\S+/ |
|
308
|
0 |
0 |
if ($ref eq 'HASH' or $ref eq ref $self) { } |
|
316
|
0 |
0 |
if ($i == $last_idx) |
|
318
|
0 |
0 |
ref $value eq 'HASH' ? : |
|
334
|
1 |
1 |
unless $last_idx > 0 |
|
339
|
1 |
1 |
if ($i < $last_idx) { } |
|
340
|
0 |
1 |
unless ref $value->{$key} eq 'HASH' |
|
345
|
1 |
0 |
ref $value eq 'HASH' && exists $value->{$key} ? : |
|
372
|
1 |
7 |
if uc $tvalue eq uc $value |
|
388
|
0 |
110 |
unless defined $uri |