Branch Coverage

blib/lib/Jasonify.pm
Criterion Covered Total %
branch 102 162 62.9


line true false branch
194 72 0 if @_
195 9 63 unless defined $_
196 4 59 if 'SCALAR' eq ref $_
197 40 19 $_ ? :
205 139 0 if @_
208 8 131 defined $blessed && $blessed->isa('Jasonify::Literal') ? :
220 8 134 if (defined $blessed) { }
221 0 8 unless $blessed->isa('Jasonify::_key')
233 142 0 if @_
235 134 8 unless LooksLike::infinity($_) or LooksLike::nan($_)
256 2 2 if (my $method_name = shift())
282 0 55 unless defined(my $class = &Scalar::Util::blessed($object))
288 53 2 if (do { my $code = $self->_find_handler($class) }) { }
0 2 elsif (my $tag = $self->_objectify_via_tag($object)) { }
0 2 elsif (my $to_json = $self->_objectify_via_json($object)) { }
0 2 elsif (my $method = $self->overloaded($object)) { }
0 2 elsif (my $attrkeyvals = $object->can('_attrkeyvals')) { }
304 0 0 $data eq 'SCALAR' ? :
0 0 $data eq 'REGEXP' ? :
0 0 $data eq 'REF' ? :
0 0 $data eq 'IO' ? :
2 0 $data eq 'HASH' ? :
0 2 $data eq 'GLOB' ? :
0 2 $data eq 'FORMAT' ? :
0 2 $data eq 'CODE' ? :
0 2 $data eq 'ARRAY' ? :
330 2 0 if @_
343 2 0 if @_
347 2 0 $self->get('vformat') ? :
355 58 0 if @_
357 0 58 unless defined $_
360 20 0 LooksLike::number($_) ? :
38 20 $self->is_numeric($_) ? :
375 348 0 if @_
377 11 337 unless defined $_
379 57 280 if (defined(my $blessed = &Scalar::Util::blessed($_)))
381 2 55 $blessed eq 'Regexp' ? :
386 164 116 unless ($ref)
390 58 104 $ref2 eq 'SCALAR' && LooksLike::number($_) ? :
2 162 $ref2 eq 'VSTRING' ? :
0 164 $ref2 eq 'LVALUE' ? :
0 164 $ref2 eq 'GLOB' ? :
400 2 0 $ref eq 'VSTRING' ? :
57 2 $ref eq 'SCALAR' ? :
0 59 $ref eq 'REGEXP' ? :
12 59 $ref eq 'REF' ? :
1 71 $ref eq 'LVALUE' ? :
0 72 $ref eq 'IO' ? :
11 72 $ref eq 'HASH' ? :
0 83 $ref eq 'GLOB' ? :
0 83 $ref eq 'FORMAT' ? :
4 83 $ref eq 'CODE' ? :
29 87 $ref eq 'ARRAY' ? :
424 0 53 unless @_
430 51 0 @_ == 1 ? :
437 10 1 @_ ? :
445 9 1 @_ ? :
454 4 1 $count == 1 ? :
8 5 $count >= 2 ? :
464 4 1 @_ ? :
500 0 0 $_[2] ? :
501 0 0 $_[2] ? :
529 0 26 unless defined $literal
530 0 26 unless length $literal
589 0 0 $_[2] ? :
590 0 0 $_[2] ? :
595 0 0 $num eq $$ninf ? :
0 0 $num eq $$inf ? :
0 0 $num eq $$nan ? :
598 0 0 $1 ? :
604 0 13 unless LooksLike::number($num)
608 13 0 $num =~ /\A$number_regex\z/u ? :
13 0 LooksLike::numeric($num) ? :
648 56 37 ${$_[0];} ? :
651 0 44 $_[2] ? :
653 1 1 &bool($_[0]) ? :
659 10 11 ${$_[0];} ? :
10 15 $_[0] ? :
21 25 ref $_[0] eq 'SCALAR' ? :
10 46 &is_bool($_[0]) ? :
663 10 46 if &Scalar::Util::blessed($_[0])