Condition Coverage

blib/lib/Contextual/Return.pm
Criterion Covered Total %
condition 74 169 43.7


and 2 conditions

line l !l condition
380 0 0 $attrs->{'STRICT'} and last handler
437 0 1 $attrs->{'STRICT'} and last handler
526 0 0 $attrs->{'STRICT'} and last handler
599 0 0 $attrs->{'STRICT'} and last handler
722 6 0 $attrs->{'STRICT'} and last handler
773 0 0 $attrs->{'STRICT'} and last handler
859 24 0 $attrs->{'STRICT'} and last handler
1090 56 0 $attrs->{'STRICT'} and last handler
1136 20 0 $attrs->{'STRICT'} and last handler
1187 1 0 $context eq 'BOOL' and $attrs->{'STRICT'} and last handler
1238 32 1 $attrs->{'STRICT'} and last handler
1297 12 1 $attrs->{'STRICT'} and last handler
1382 0 1 $attrs->{'STRICT'} and last handler
1432 0 0 $attrs->{'STRICT'} and last handler
1482 0 0 $attrs->{'STRICT'} and last handler
1634 51 0 $attrs->{'STRICT'} and last handler

and 3 conditions

line !l l&&!r l&&r condition
149 22 0 48 $package eq $orig_package and $prev_package eq $orig_package
213 6 3 6 defined $next_arg && !ref($next_arg) && !exists $STD_NAME_FOR{$next_arg}
318 0 0 18 @_ == 1 and $impl = tied $_[0]
338 27 1 0 not defined wantarray and $impl->{'NVALUE'}
397 0 0 0 not $attrs->{'STRICT'} and my $handler = $attrs->{'ARRAYREF'}
616 0 0 0 not $attrs->{'STRICT'} and my $handler = $attrs->{'ARRAYREF'}
677 0 3 0 defined $callers_context && ($context eq 'NONVOID' || !$callers_context)
739 0 1 0 not $attrs->{'STRICT'} and my $handler = $attrs->{'ARRAYREF'}
876 0 2 1 not $attrs->{'STRICT'} and my $handler = $attrs->{'ARRAYREF'}
1001 0 0 0 ref $retval eq 'REF' and eval { do { ${$retval;} == ${$self;} } }
1187 21 1 0 $context eq 'BOOL' and $attrs->{'STRICT'}
1259 15 0 0 ref $rv ne 'SCALAR' and ref $rv ne 'OBJ'
1317 15 0 0 ref $rv ne 'ARRAY' and ref $rv ne 'OBJ'
1403 15 0 0 ref $rv ne 'HASH' and ref $rv ne 'OBJ'
1453 7 0 0 ref $rv ne 'CODE' and ref $rv ne 'OBJ'
1503 7 0 0 ref $rv ne 'GLOB' and ref $rv ne 'OBJ'

or 2 conditions

line l !l condition
33 29 6 $_[0] || 0
90 15 1 &refaddr($_[0]) or ''
232 6 9 $renamer ||= '%s'
235 5 10 ref $selector || 'literal'
357 21 0 &refaddr($crv) or ''
414 0 0 ref $array_ref || ''
633 0 0 ref $array_ref || ''
756 0 0 ref $array_ref || ''
894 1 0 ref $array_ref || ''
1573 22 0 $attrs_of{&refaddr($self)} || {}

or 3 conditions

line l !l&&r !l&&!r condition
362 0 1 20 $attrs->{'want_pure_bool'} ||= Want::want('BOOL')
380 2 0 0 my $handler = $attrs->{$context} or $attrs->{'STRICT'} and last handler
437 0 0 1 my $handler = $attrs->{$context} or $attrs->{'STRICT'} and last handler
494 0 0 141 $attrs->{'want_pure_bool'} ||= Want::want('BOOL')
526 0 0 0 my $handler = $attrs->{$context} or $attrs->{'STRICT'} and last handler
584 0 6 50 $attrs->{'want_pure_bool'} ||= Want::want('BOOL')
599 6 0 0 my $handler = $attrs->{$context} or $attrs->{'STRICT'} and last handler
706 0 0 135 $attrs->{'want_pure_bool'} ||= Want::want('BOOL')
722 1 0 6 my $handler = $attrs->{$context} or $attrs->{'STRICT'} and last handler
773 1 0 0 my $handler = $attrs->{$context} or $attrs->{'STRICT'} and last handler
840 0 12 1113 $attrs->{'want_pure_bool'} ||= Want::want('BOOL')
859 12 0 24 my $handler = $attrs->{$context} or $attrs->{'STRICT'} and last handler
1017 0 0 0 exists $attrs_ref->{'VOID'} or exists $attrs_ref->{'DEFAULT'}
1025 0 0 0 eval { do { [&_internal_LIST(sub { } , $self)] } } // do { chomp $@; "<<>>" }
1090 39 0 56 my $handler = $attrs->{$context} or $attrs->{'STRICT'} and last handler
1136 30 0 20 my $handler = $attrs->{$context} or $attrs->{'STRICT'} and last handler
1187 35 0 22 my $handler = $attrs->{$context} or $context eq 'BOOL' and $attrs->{'STRICT'} and last handler
1238 15 0 33 my $handler = $attrs->{$context} or $attrs->{'STRICT'} and last handler
1297 15 0 13 my $handler = $attrs->{$context} or $attrs->{'STRICT'} and last handler
1382 15 0 1 my $handler = $attrs->{$context} or $attrs->{'STRICT'} and last handler
1432 7 0 0 my $handler = $attrs->{$context} or $attrs->{'STRICT'} and last handler
1482 7 0 0 my $handler = $attrs->{$context} or $attrs->{'STRICT'} and last handler
1634 10 0 51 my $handler = $attrs->{$context} or $attrs->{'STRICT'} and last handler