Branch Coverage

blib/lib/JSON/Any.pm
Criterion Covered Total %
branch 46 76 60.5


line true false branch
50 0 0 unless exists $$conf{$mutator}
96 22 1 unless exists $$conf{$mutator}
113 0 0 if $$conf{'utf8'}
143 0 0 unless exists $$conf{$mutator}
182 167 25 unless exists $$conf{$mutator}
201 0 0 if $$conf{'utf8'}
228 0 34 if ('json_xs' eq $key or 'json' eq $key)
240 8 17 if $testmod eq 'CPANEL'
241 2 15 if $testmod eq 'JSON'
250 9 8 if (eval "require $testmod; 1")
253 0 9 unless exists $conf{$key}
268 1 16 if not @order and $ENV{'JSON_ANY_ORDER'}
271 12 5 if (@order) { }
273 0 12 if ($handler and grep {"JSON::$_" eq $handler;} @deprecated)
275 0 0 unless @upgrade_to
282 0 5 unless ($handler)
284 0 0 if ($handler)
291 8 9 unless ($handler)
292 8 0 @order ? :
294 0 9 unless $decoder
295 0 9 unless $encoder
302 0 8 @list ? :
451 13 0 if (my $creator = $conf{$key}{'create_object'})
454 2 11 if ($ENV{'JSON_ANY_CONFIG'})
494 3 0 if (ref $self)
546 0 34 unless defined $obj
550 22 12 if (ref $self) { }
552 22 0 if (not ref $$self[1]) { }
553 0 22 unless exists $$self[0]
556 0 22 unless $method
567 20 12 ref $self ? :
2 8 if ref $self ? $$self[3] : $UTF8 and not utf8::is_utf8($json) and utf8::valid($json)
607 0 16 unless defined $obj
610 2 14 if ($obj =~ /^(true|false)$/)
614 9 5 if (ref $self)
616 9 0 if (not ref $$self[2]) { }
617 0 9 unless exists $$self[0]
620 0 9 unless $method