Branch Coverage

blib/lib/Perl6/Junction/All.pm

Criterion	Covered	Total	%
branch	50	50	100.0

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