Branch Coverage

blib/lib/Data/Recursive/Encode.pm
Criterion Covered Total %
branch 14 16 87.5


line true false branch
18 27 47 if (my $ref = ref $arg) { }
22 1 26 if (defined($proto = $$seen{$refaddr})) { }
8 18 elsif ($ref eq 'ARRAY') { }
6 12 elsif ($ref eq 'HASH') { }
4 8 elsif ($ref eq 'REF' or $ref eq 'SCALAR') { }
44 47 0 defined $arg ? :
48 50 6 wantarray ? :
79 0 1 unless @_ >= 4