| line |
true |
false |
branch |
|
73
|
28 |
11 |
if @_ |
|
80
|
4 |
25 |
if (my $ref = ref $_[0]) { } |
|
81
|
3 |
1 |
if ($ref eq 'ARRAY') { } |
|
|
1 |
0 |
elsif ($ref eq 'HASH') { } |
|
82
|
1 |
2 |
if ($ref = ref $_[1]) { } |
|
83
|
1 |
0 |
if ($ref eq 'HASH') { } |
|
85
|
0 |
1 |
if @_ |
|
100
|
0 |
1 |
if @_ |
|
109
|
19 |
6 |
if ($ref = ref $_[1]) { } |
|
110
|
11 |
8 |
if ($ref eq 'ARRAY') { } |
|
|
8 |
0 |
elsif ($ref eq 'HASH') { } |
|
111
|
2 |
9 |
if ($ref = ref $_[2]) { } |
|
112
|
2 |
0 |
if ($ref eq 'HASH') { } |
|
114
|
0 |
2 |
if @_ |
|
129
|
0 |
8 |
if @_ |
|
138
|
6 |
0 |
if (@_) { } |
|
139
|
6 |
0 |
if (@_ % 2) { } |
|
159
|
1 |
28 |
if do {
no strict 'refs';
exists &{"${class}::as_string";}
} |
|
166
|
0 |
29 |
if $k =~ /^_/o |
|
178
|
3 |
26 |
if (do {
no strict 'refs';
exists &{"${class}::$k";}
}) |
|
185
|
3 |
26 |
if UNIVERSAL::can($class, $k) |
|
187
|
11 |
18 |
if ($v eq '$') { } |
|
|
1 |
17 |
elsif ($v eq '\\$' or $v eq '*$') { } |
|
|
1 |
16 |
elsif ($v eq '@') { } |
|
|
1 |
15 |
elsif ($v eq '+@') { } |
|
|
1 |
14 |
elsif ($v eq '\\@' or $v eq '*@') { } |
|
|
2 |
12 |
elsif ($v eq '%') { } |
|
|
1 |
11 |
elsif ($v eq '+%') { } |
|
|
1 |
10 |
elsif ($v eq '\\%' or $v eq '*%') { } |
|
|
1 |
9 |
elsif ($v eq '&') { } |
|
|
1 |
8 |
elsif ($v eq '\\&' or $v eq '*&') { } |
|
|
1 |
7 |
elsif ($v eq '/') { } |
|
|
1 |
6 |
elsif ($v eq '\\/' or $v eq '*/') { } |
|
|
1 |
5 |
elsif ($v =~ s/^\+@(\w+(?:::\w+)*)$/$1/o) { } |
|
|
0 |
5 |
elsif ($v =~ s/^@(\w+(?:::\w+)*)$/$1/o) { } |
|
|
1 |
4 |
elsif ($v =~ s/^\+%(\w+(?:::\w+)*)$/$1/o) { } |
|
|
0 |
4 |
elsif ($v =~ s/^%(\w+(?:::\w+)*)$/$1/o) { } |
|
|
1 |
3 |
elsif ($v =~ s/^[\\*](\w+(?:::\w+)*)$/$1/o) { } |
|
|
3 |
0 |
elsif ($v =~ /^\w+(?:::\w+)*$/o) { } |
|
282
|
5 |
9 |
if $c = 'Ice'->can($k) |
|
|
3 |
1 |
if $c = 'Cranberry'->can($k) |
|
|
0 |
2 |
if $c = 'Akron'->can($k) |
|
|
0 |
1 |
if $c = 'Anise'->can($k) |
|
|
0 |
3 |
if $c = 'Ginger'->can($k) |
|
|
0 |
1 |
if $c = 'Dillweed'->can($k) |
|
|
0 |
1 |
if $c = 'Jello'->can($k) |
|
|
0 |
1 |
if $c = 'Fruit'->can($k) |
|
|
0 |
1 |
if $c = 'Dayton'->can($k) |
|
|
0 |
1 |
if $c = 'Banana'->can($k) |
|
|
1 |
2 |
if $c = 'Eggplant'->can($k) |
|
|
0 |
3 |
if $c = 'Baltimore'->can($k) |
|
|
0 |
2 |
if $c = 'Cleveland'->can($k) |
|
|
0 |
2 |
if $c = 'Horseradish'->can($k) |
|
|
0 |
1 |
@_ == 2 ? : |
|
|
0 |
1 |
@_ == 2 ? : |
|
|
0 |
0 |
@_ == 2 ? : |
|
|
0 |
0 |
@_ == 2 ? : |
|
|
0 |
0 |
@_ == 2 ? : |
|
|
0 |
0 |
@_ == 2 ? : |
|
|
0 |
0 |
@_ == 2 ? : |
|
|
0 |
0 |
@_ == 2 ? : |
|
|
0 |
0 |
if $ref ne 'ARRAY' |
|
|
0 |
0 |
if (my $ref = ref $_[1]) { } |
|
|
0 |
0 |
if (@_ == 3) { } |
|
|
0 |
0 |
elsif (@_ == 2) { } |
|
|
0 |
0 |
if $ref ne 'ARRAY' |
|
|
0 |
0 |
if (my $ref = ref $_[1]) { } |
|
|
0 |
0 |
if (@_ == 3) { } |
|
283
|
0 |
29 |
if $@ |
|
296
|
0 |
0 |
if $class eq $super |
|
305
|
0 |
0 |
if $s eq $super |
|
475
|
0 |
0 |
$hidden ? : |