Branch Coverage

blib/lib/JSON/Any.pm
Criterion Covered Total %
branch 50 76 65.7


line true false branch
50 0 0 unless exists $conf->{$mutator}
95 66 3 unless exists $conf->{$mutator}
112 0 0 if $conf->{'utf8'}
142 0 0 unless exists $conf->{$mutator}
181 197 27 unless exists $conf->{$mutator}
200 0 0 if $conf->{'utf8'}
241 0 42 if ("json_xs" eq $key or "json" eq $key)
253 12 44 if $testmod eq "CPANEL"
254 12 32 if $testmod eq "JSON"
263 13 22 if (eval "require $testmod; 1")
266 0 13 unless exists $conf{$key}
282 3 6 if not @order and $ENV{'JSON_ANY_ORDER'}
284 23 6 if (@order) { }
286 0 23 if ($handler and grep(("JSON::$_" eq $handler), @deprecated))
288 0 0 unless @upgrade_to
295 1 5 unless ($handler)
297 0 1 if ($handler)
304 16 13 unless ($handler)
305 15 1 @order ? :
307 0 13 unless $decoder
308 0 13 unless $encoder
315 2 14 @list ? :
464 17 0 if (my $creator = $conf{$key}{'create_object'})
467 4 13 if ($ENV{'JSON_ANY_CONFIG'})
498 11 0 if (ref $self)
538 0 52 unless defined $obj
542 26 26 if (ref $self) { }
544 0 26 if (ref $self->[1]) { }
545 0 26 unless exists $self->[0]
548 0 26 unless $method
559 24 26 ref $self ? :
2 12 if ref $self ? $self->[3] : $UTF8 and not utf8::is_utf8($json) and utf8::valid($json)
590 0 40 unless defined $obj
593 2 38 if ($obj =~ /^(true|false)$/)
597 17 21 if (ref $self)
599 0 17 if (ref $self->[2]) { }
600 0 17 unless exists $self->[0]
603 0 17 unless $method