Branch Coverage

blib/lib/Class/Builtin/Array.pm

Criterion	Covered	Total	%
branch	5	32	15.6

line	true	false	branch
31	84	0	eval { do { $_->can('unbless') } } ? :
74	1	1	@_ == 2 ? :
	0	2	@_ == 1 ? :
	0	2	@_ == 0 ? :
115	0	0	$block ? :
125	0	0	unless my $block = CORE::shift()
127	0	0	if (CORE::ref $block eq 'Regexp') { }
129	0	0	unless $_ =~ /$block/
135	0	0	unless &$block($_)
144	0	0	unless my $block = CORE::shift()
154	0	0	unless my $block = CORE::shift()
179	0	0	@_ ? :
186	0	0	@_ ? :
211	0	0	unless my $block = CORE::shift()
213	0	0	if &$block($_)
220	0	0	unless my $block = CORE::shift()