| line |
true |
false |
branch |
|
12
|
0 |
15 |
if @_ % 2 |
|
20
|
3 |
42 |
if exists $args{$key} |
|
23
|
0 |
15 |
if $args{'override'} |
|
32
|
11 |
4 |
if (ref $args{'param'} eq 'HASH') { } |
|
|
4 |
0 |
elsif ($args{'param'}->can('param')) { } |
|
39
|
2 |
3 |
scalar @val > 1 ? : |
|
44
|
1 |
14 |
if ($args{'sticky_keys'}) |
|
48
|
2 |
1 |
if $sticky{$k} |
|
54
|
13 |
2 |
if ($args{'file'}) { } |
|
|
1 |
1 |
elsif ($args{'scalarref'}) { } |
|
|
1 |
0 |
elsif ($args{'arrayref'}) { } |
|
75
|
7 |
18 |
if ($tagname ne 'a') { } |
|
80
|
0 |
18 |
unless (exists $$attr{'href'}) |
|
87
|
1 |
17 |
if (not $$self{'abs'} and $u->scheme) |
|
92
|
0 |
17 |
if (defined $u->scheme and not $u->scheme =~ /^https?/) { } |
|
97
|
16 |
1 |
if (not $$self{'regexp'} or $u->path =~ /$$self{'regexp'}/) |
|
98
|
15 |
1 |
if ($$self{'keep_original'}) { } |
|
102
|
1 |
3 |
if (exists $original{$key}) { } |
|
103
|
0 |
1 |
if (ref $original{$key} eq 'ARRAY') { } |
|
123
|
16 |
2 |
if ($key eq 'href') { } |
|
|
1 |
1 |
elsif ($$attr{$key} eq '__BOOLEAN__') { } |