Branch Coverage

blib/lib/Perlude/Lazy.pm
Criterion Covered Total %
branch 52 56 92.8


line true false branch
34 44 40246 if (@_) { }
36 29 15 if @b >= $n
39 7 8 @b < $n ? :
42 18 40228 if @b
44 40178 50 @b ? :
56 10 2 if @v
65 142 43 @array ? :
71 23 61 unless (wantarray)
72 6 17 if (defined wantarray) { }
97 1 9 unless 1 < (($l, my @v) = &$l())
98 5 4 &$cond() ? :
107 2 20007 unless 1 < (($l, my @v) = &$l())
117 32 30174 unless $n-- > 0
118 39 30135 unless 1 < (($l, my @v) = &$l())
133 1 10003 unless 1 < (($l, my @v) = &$l())
143 4 25 unless 1 < (($l, my @v) = &$l())
150 0 2 unless my(@ring) = @_
160 0 14 if $step == 0
166 16 6 ($begin += $step) <= $end ? :
167 5 3 ($begin += $step) >= $end ? :
168 6 3 $step > 0 ? :
9 5 defined $end ? :
174 3 3 if $n <= 0
180 6 3 @r ? :
188 0 2 if ref $v
196 1 1 unless @_
199 0 1 unless $_[0] ~~ 'chomp'
203 1 3 unless defined(my $v = <$fh>)