blib/lib/Var/Pairs.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 10 | 31 | 32.2 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
108 | 42 | 0 | 0 | not wantarray and $iterator_for{$ID} |
129 | 0 | 0 | 134 | ref $_[0] && var_name(1, $_[0]) |
181 | 0 | 0 | 91 | ref $_[0] && var_name(1, $_[0]) |
204 | 0 | 0 | 0 | ref $_[0] && var_name(1, $_[0]) |
line | l | !l | condition |
---|---|---|---|
97 | 43 | 1 | ref $container_ref || 'scalar value' |
158 | 16 | 0 | ref $container_ref || 'scalar value' |
250 | 0 | 0 | ref $var_ref or "SCALAR" |
255 | 0 | 0 | $inversion{$value} //= [] |
264 | 0 | 0 | $inversion{$value} //= [] |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
142 | 113 | 21 | 0 | $iterator_for{$ID} //= ref $container_ref eq "CODE" ? sub { state $n = 0; return unless my($next) = &$container_ref(); return $n++, $next; } : [&pairs] |
193 | 76 | 15 | 0 | $iterator_for{$ID} //= ref $container_ref eq "CODE" ? sub { state $n = 0; return unless my($next) = &$container_ref(); return $n++, $next; } : [&kvs] |
216 | 0 | 0 | 0 | $iterator_for{$ID} //= ref $container_ref eq "CODE" ? sub { state $n = 0; return unless my($next) = &$container_ref(); return $n++, $next; } : [&kvs] |