Branch Coverage

blib/lib/MCE/Shared/Ordhash.pm

Criterion	Covered	Total	%
branch	32	208	15.3

line	true	false	branch
51	0	0	unless ($_[0][5])
75	0	0	unless exists $data{$key = CORE::shift()}
86	20	0	unless exists $self->[0]{$key}
103	0	4	if ($key eq $keys->[0]) { }
	0	4	elsif ($key eq $keys->[-1]) { }
105	0	0	if %{$indx;}
107	0	0	if (not @{$keys;}) { }
	0	0	elsif (not defined $keys->[0]) { }
124	0	0	if %{$indx;}
126	0	0	if (not @{$keys;}) { }
	0	0	elsif (not defined $keys->[-1]) { }
142	0	4	unless exists $data->{$key}
144	2	2	%{$indx;} ? :
145	0	2	if ${$gcnt;}
156	0	4	if (++${$gcnt;} > @{$keys;} * "0.667")
160	0	0	if defined $k
214	2	0	unless (exists $$indx{$keys->[0]})
217	0	6	unless defined $k
218	2	4	if exists $indx->{$k}
224	2	0	unless (exists $$indx{$keys->[-1]})
227	0	6	unless defined $k
228	2	4	if exists $indx->{$k}
248	0	0	if %{$indx;}
250	0	0	if (not @{$keys;}) { }
	0	0	elsif (not defined $keys->[-1]) { }
261	0	0	defined $key ? :
272	0	4	if exists $$data{$key = CORE::shift()}
276	0	4	defined wantarray ? :
285	0	0	if %{$indx;}
287	0	0	if (not @{$keys;}) { }
	0	0	elsif (not defined $keys->[0]) { }
298	0	0	defined $key ? :
309	0	4	if exists $$data{$key = $_[-2]}
311	4	0	if %{$indx;}
314	0	4	defined wantarray ? :
322	0	0	unless defined $off
324	0	0	if %{$self->[2];}
327	0	0	@_ ? :
330	0	0	if ($off >= $size) { }
	0	0	elsif (abs $off <= $size) { }
331	0	0	if @_
335	0	0	if ($len > 0)
336	0	0	if $off < 0
340	0	0	if (@_)
362	0	0	ref $_[0] eq 'HASH' ? :
373	0	0	ref $_[0] eq 'HASH' ? :
377	0	0	if (@_) { }
379	0	0	if (scalar CORE::keys %data == scalar @_) { }
389	0	0	if exists $data{$key}
398	0	0	${$self->[4];} ? :
403	0	0	if $params->{'flush'}
423	2	0	if (not @keys) { }
	0	0	elsif (@keys == 1 and $keys[0] =~ /^(?:key|val)[ ]+\S\S?[ ]+\S/) { }
431	2	4	unless @keys
444	0	2	if (@_ == 1 and $_[0] =~ /^(?:key|val)[ ]+\S\S?[ ]+\S/) { }
	2	0	elsif (wantarray) { }
448	0	2	if (@_)
450	0	0	exists $data->{$_} ? :
454	0	2	${$self->[4];} ? :
468	0	3	if (@_ == 1 and $_[0] =~ /^(?:key|val)[ ]+\S\S?[ ]+\S/) { }
	3	0	elsif (wantarray) { }
473	0	3	if (@_)
478	0	3	${$self->[4];} ? :
492	0	0	if (@_ == 1 and $_[0] =~ /^(?:key|val)[ ]+\S\S?[ ]+\S/) { }
	0	0	elsif (wantarray) { }
496	0	0	if (@_)
501	0	0	${$self->[4];} ? :
528	0	0	if exists $data->{$key}
542	0	0	unless exists $data->{$key}
553	0	0	@_ ? :
563	0	0	unless exists $$data{$key = CORE::shift()}
567	0	0	defined wantarray ? :
577	0	0	if (${$gcnt;})
580	0	0	if defined $key
599	0	0	if (length $request)
600	0	0	if $request =~ /\bkey\b/i
601	0	0	if $request =~ /\balpha\b/i
602	0	0	if $request =~ /\bdesc\b/i
608	0	0	${$self->[4];} ? :
611	0	0	if (defined wantarray) { }
	0	0	elsif ($by_key) { }
612	0	0	if ($by_key) { }
613	0	0	if ($alpha) { }
615	0	0	$desc ? :
619	0	0	$desc ? :
624	0	0	if ($alpha) { }
626	0	0	$desc ? :
630	0	0	$desc ? :
638	0	0	if ($alpha) { }
640	0	0	$desc ? :
644	0	0	$desc ? :
649	0	0	if ($alpha) { }
651	0	0	$desc ? :
655	0	0	$desc ? :
680	0	0	unless exists $data->{$key}
689	0	0	unless exists $data->{$key}
698	0	0	unless exists $data->{$key}
707	0	0	unless exists $data->{$key}
716	0	0	unless exists $data->{$key}
725	0	0	unless exists $data->{$key}
734	0	0	unless exists $data->{$key}
743	0	0	unless exists $data->{$key}
755	0	0	if exists $data->{$key}
768	0	0	defined $_[1] ? :