Branch Coverage

lib/Perlmazing/Engine.pm

Criterion	Covered	Total	%
branch	69	140	49.2

line	true	false	branch
17	0	50	unless exists $found_symbols->{$package}
24	0	0	unless exists $loaded_symbols->{$package}
39	0	50	if @_ % 2
42	50	0	unless $parameters->{$package}
44	0	50	if exists $found_symbols->{$package}
57	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
	0	50	unless eval 'INIT{} 1'
58	0	2100	if $@
65	0	18614	if $parameters->{$caller}{'debug'}
75	9200	4600	if $i->{'Clobber'}
78	2550	2050	if ($i->Module eq "${package}::Perlmazing::Precompile::$i->{'Name'}")
93	0	50	unless exists $precompile_symbols->{$package}
99	0	2550	unless defined $precompile_symbols->{$package}{$name}
125	1074	2518	if exists $loaded_symbols->{$package} and exists $loaded_symbols->{$package}{$symbol}
126	0	2568	unless exists $found_symbols->{$package} and exists $found_symbols->{$package}{$symbol}
138	0	2568	if (my $e = $@)
141	0	2568	if length $stderr
143	0	2568	unless $loaded_symbols->{$package}{$symbol}
145	0	2568	if ("${package}::Perlmazing::$symbol"->isa('Perlmazing::Listable'))
157	0	0	unless @_
158	0	0	if ($wantarray) { }
	0	0	elsif (defined $wantarray) { }
174	0	0	if (my $e = $@)
175	0	0	if ($e =~ /^Modification of a read\-only value attempted/u) { }
181	0	0	if $wantarray
194	2568	5188	if $i eq 'Perlmazing::Engine'
195	2587	2601	if (my $ref = *{"${i}::$symbol";}{'CODE'})
198	2100	487	if (defined $proto_new and defined $proto_old and $proto_old ne $proto_new or defined $proto_old and not defined $proto_new or defined $proto_new and not defined $proto_old)
199	0	2100	unless _is_compile_phase()
202	2587	0	if $ref eq $skeleton