| line |
true |
false |
branch |
|
36
|
2 |
6 |
if (ref $arg eq 'HASH') { } |
|
|
6 |
0 |
elsif (not ref $arg) { } |
|
37
|
1 |
1 |
if (exists $arg->{'JS'}) |
|
38
|
1 |
1 |
if (exists $arg->{'UNDEF'}) |
|
44
|
8 |
1 |
$opt{'JS'} > $JSCOMPAT_UNDEFINED_MISSING ? : |
|
47
|
9 |
0 |
if (defined $package) |
|
49
|
6 |
3 |
if (scalar @explicit_imports) { } |
|
55
|
6 |
0 |
if (substr($explicit_import, 0, 1) eq ':') { } |
|
|
0 |
0 |
elsif (exists $allowable{$explicit_import}) { } |
|
59
|
0 |
6 |
unless (exists $EXPORT_TAGS{$tag}) |
|
93
|
0 |
0 |
wantarray ? : |
|
99
|
0 |
21 |
unless scalar @input |
|
104
|
18 |
3 |
wantarray ? : |
|
112
|
0 |
32 |
if ($] < $MIN_ENCODE_REQUIRE_BREAKPOINT) { } |
|
120
|
4 |
28 |
if ($opt{'JS'} >= $JSCOMPAT_DEFAULT_VERSION and &Encode::is_utf8($input)) |
|
157
|
38 |
10 |
unless ($ref) |
|
158
|
4 |
34 |
unless (defined $elem) |
|
159
|
1 |
3 |
defined $undef ? : |
|
163
|
12 |
22 |
if ($elem =~ /^[+-]?(?:(?=\d|[.])\d*(?:[.]\d{0,})?)$/msux) |
|
166
|
1 |
11 |
if ($elem =~ /^0\d+$/msux) |
|
177
|
0 |
10 |
if ($dict->{$elem}) |
|
183
|
6 |
4 |
if ($ref eq 'ARRAY' or &reftype($elem) eq 'ARRAY') { } |
|
|
4 |
0 |
elsif ($ref eq 'HASH' or &reftype($elem) eq 'HASH') { } |