| line |
true |
false |
branch |
|
140
|
0 |
0 |
unless (defined $variable)
|
|
142
|
0 |
0 |
if ($type eq 'unknown') { }
|
|
|
0 |
0 |
elsif ($type eq 'boolean') { }
|
|
|
0 |
0 |
elsif ($type eq 'integer') { }
|
|
|
0 |
0 |
elsif ($type eq 'character') { }
|
|
|
0 |
0 |
elsif ($type eq 'string') { }
|
|
162
|
0 |
0 |
unless (defined $variable)
|
|
166
|
0 |
0 |
if ($type eq 'unknown') { }
|
|
|
0 |
0 |
elsif ($type eq 'boolean') { }
|
|
|
0 |
0 |
elsif ($type eq 'integer') { }
|
|
|
0 |
0 |
elsif ($type eq 'number') { }
|
|
|
0 |
0 |
elsif ($type eq 'character') { }
|
|
|
0 |
0 |
elsif ($type eq 'string') { }
|
|
196
|
0 |
1983 |
unless (defined $variable)
|
|
197
|
1983 |
0 |
unless (defined $recurse_level)
|
|
204
|
0 |
1983 |
if ($is_type->{'number'}) { }
|
|
|
0 |
1983 |
elsif ($is_type->{'integer'}) { }
|
|
|
1983 |
0 |
elsif ($is_type->{'string'}) { }
|
|
217
|
0 |
0 |
unless (defined $variable)
|
|
218
|
0 |
0 |
unless (defined $recurse_level)
|
|
222
|
0 |
0 |
if ($is_type->{'integer'}) { }
|
|
|
0 |
0 |
elsif ($is_type->{'number'}) { }
|
|
|
0 |
0 |
elsif ($is_type->{'string'}) { }
|
|
253
|
0 |
1983 |
if (defined $is_type->{'class'})
|
|
265
|
0 |
0 |
unless (defined $recurse_level)
|
|
266
|
0 |
0 |
unless (defined $is_type)
|
|
277
|
0 |
0 |
if (not defined $variable) { }
|
|
|
0 |
0 |
elsif ($is_type->{'integer'}) { }
|
|
|
0 |
0 |
elsif ($is_type->{'number'}) { }
|
|
|
0 |
0 |
elsif ($is_type->{'string'}) { }
|
|
282
|
0 |
0 |
if (defined $type) { }
|
|
|
0 |
0 |
elsif ($recurse_level <= 0) { }
|
|
290
|
0 |
0 |
if ($is_type->{'blessed'}) { }
|
|
|
0 |
0 |
elsif ($is_type->{'arrayref'}) { }
|
|
|
0 |
0 |
elsif ($is_type->{'hashref'}) { }
|
|
307
|
0 |
0 |
if ($is_type->{'blessed'}) { }
|
|
|
0 |
0 |
elsif ($is_type->{'arrayref'}) { }
|
|
|
0 |
0 |
elsif ($is_type->{'hashref'}) { }
|
|
316
|
0 |
0 |
if (not defined $subtypes->[1]) { }
|
|
345
|
0 |
0 |
if (not defined $subtypes->[1]) { }
|
|
359
|
0 |
0 |
if (not defined $subtype) { }
|
|
|
0 |
0 |
elsif ($is_homogeneous) { }
|
|
361
|
0 |
0 |
if ($subtype eq 'object')
|
|
373
|
0 |
0 |
if ($subtype eq 'object' and $subtypes->[0] eq 'object' and $subtype_class ne $subtypes->[1]{'object'}{'__CLASS'}) { }
|
|
382
|
0 |
0 |
if ($object_mismatch or $subtype ne $subtypes->[0])
|
|
389
|
0 |
0 |
if ($object_mismatch)
|
|
396
|
0 |
0 |
if (scalar @{$reverse_split_subtypes_0;} < $shorter_split_length)
|
|
403
|
0 |
0 |
if ($reverse_split_subtype->[$i] eq $reverse_split_subtypes_0->[$i])
|
|
404
|
0 |
0 |
if ($new_subtype eq '') { }
|
|
412
|
0 |
0 |
if ($new_subtype ne '') { }
|
|
423
|
0 |
0 |
if ($is_homogeneous)
|
|
426
|
0 |
0 |
if (not defined $subtype or $subtype eq 'unknown')
|
|
427
|
0 |
0 |
if ($subtype ne '')
|
|
450
|
0 |
0 |
if (not defined $subtypes->[1]) { }
|
|
464
|
0 |
0 |
if (not defined $subtype) { }
|
|
|
0 |
0 |
elsif ($is_homogeneous) { }
|
|
466
|
0 |
0 |
if ($subtype eq 'object')
|
|
478
|
0 |
0 |
if ($subtype eq 'object' and $subtypes->[0] eq 'object' and $subtype_class ne $subtypes->[1]{'object'}{'__CLASS'}) { }
|
|
487
|
0 |
0 |
if ($object_mismatch or $subtype ne $subtypes->[0])
|
|
494
|
0 |
0 |
if ($object_mismatch)
|
|
501
|
0 |
0 |
if (scalar @{$reverse_split_subtypes_0;} < $shorter_split_length)
|
|
508
|
0 |
0 |
if ($reverse_split_subtype->[$i] eq $reverse_split_subtypes_0->[$i])
|
|
509
|
0 |
0 |
if ($new_subtype eq '') { }
|
|
517
|
0 |
0 |
if ($new_subtype ne '') { }
|
|
528
|
0 |
0 |
if ($is_homogeneous)
|
|
531
|
0 |
0 |
if (not defined $subtype or $subtype eq 'unknown')
|
|
532
|
0 |
0 |
if ($subtype ne '')
|
|
568
|
0 |
13 |
if ($types_input ne 'PERL' and $types_input ne 'CPP')
|