blib/lib/Data/Diver.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 23 | 33 | 69.7 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
71 | 61 | 0 | 4 | eval { do { my $x = $$key[0]; 1 } } and isa($ref, 'CODE') |
38 | 1 | 22 | $key =~ /^-?\d+$/ and eval { do { my $x = $$ref[0]; 1 } } | |
78 | 0 | 2 | 2 | @_ and not defined $_[0] |
119 | 32 | 0 | 0 | eval { do { my $x = $$key[0]; 1 } } and isa($$sv, 'CODE') |
21 | 11 | 0 | eval { do { my $x = $$key; 1 } } and !defined($$sv) || eval { do { my $x = $$$sv{'0'}; 1 } } | |
17 | 5 | 0 | $key =~ /^-?\d+$/ and !defined($$sv) || eval { do { my $x = $$$sv[0]; 1 } } | |
124 | 0 | 0 | 0 | @_ and not defined $_[0] |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
57 | 6 | 2 | 2 | @_ or not @lastError |
86 | 1 | 1 | 20 | $key < -@$ref or $#$ref < $key |
119 | 4 | 6 | 1 | !defined($$sv) || eval { do { my $x = $$$sv{'0'}; 1 } } |
1 | 4 | 0 | !defined($$sv) || eval { do { my $x = $$$sv[0]; 1 } } |