line |
true |
false |
branch |
44
|
0 |
0 |
${$_[0];} =~ /^[0-9.]+$/g ? : |
50
|
1 |
2 |
unless compare($recurse, map({$_->[$i];} @_)) |
56
|
0 |
0 |
unless compare($recurse, map({$_->{$k};} @_)) |
70
|
3 |
25 |
ref $hide ? : |
96
|
5 |
0 |
defined $_[0] ? : |
109
|
3 |
0 |
defined $_[0] ? : |
132
|
0 |
3 |
ref $sr[1] eq 'CODE' ? : |
220
|
3 |
0 |
if recurse($_[0], $_) |
247
|
1 |
1 |
$str =~ /($encode{'regex'})(?![a-z#]+;)/ ? : |
257
|
1 |
1 |
(shift()) =~ /&([a-z#]+;)/ ? : |
288
|
7 |
1 |
if $hide =~ /^escape|unescape|schema|host|path|query_string|fragment$/ |
300
|
1 |
1 |
$4 || $5 || $6 || $7 ? : |
305
|
1 |
1 |
$2 || $5 || $6 || $7 ? : |
310
|
1 |
1 |
$2 || $4 || $6 || $7 ? : |
315
|
1 |
1 |
$2 || $4 || $5 || $7 ? : |
320
|
1 |
1 |
$2 || $4 || $5 || $6 ? : |
324
|
1 |
0 |
ref $_[0] eq 'HASH' ? : |
328
|
1 |
1 |
$_[0] =~ /($esc)(?!$unesc)/ ? : |
332
|
1 |
1 |
$_[0] =~ /%$unesc/ ? : |
413
|
0 |
0 |
unless not $ref or $ref eq "ARRAY" |
414
|
0 |
0 |
$ref eq 'ARRAY' ? : |
416
|
0 |
0 |
if $key eq "encode" |
|
0 |
0 |
$type ? : |
424
|
0 |
0 |
$ref ? : |
425
|
0 |
0 |
if $ref and ref $_[0][1] eq "ARRAY" |
432
|
3 |
5 |
if scalar keys %same != 1 |
439
|
14 |
0 |
if exists $recurse->{$ref} |