Branch Coverage

blib/lib/Perl6/Junction/Any.pm
Criterion Covered Total %
branch 50 50 100.0


line true false branch
8 5 10 if ref $_[1] eq 'Regexp'
13 7 7 if $_ == $test
20 3 3 if ref $_[1] eq 'Regexp'
25 2 3 if $_ != $test
34 3 7 if $switch
37 5 12 if $_ >= $test
46 6 6 if $switch
49 4 9 if $_ > $test
58 3 6 if $switch
61 4 6 if $_ <= $test
70 3 9 if $switch
73 7 8 if $_ < $test
83 2 2 if $_ eq $test
93 1 3 if $_ ne $test
102 3 6 if $switch
105 4 4 if $_ ge $test
114 4 6 if $switch
117 4 5 if $_ gt $test
126 3 6 if $switch
129 4 4 if $_ le $test
138 3 7 if $switch
141 4 8 if $_ lt $test
151 2 9 if $_ =~ /$test/
161 2 7 unless $_ =~ /$test/
171 2 3 if $_