Branch Coverage

blib/lib/ABNF/Validator.pm

Criterion	Covered	Total	%
branch	56	114	49.1

line	true	false	branch
58	0	3	unless @_ > 0
	0	3	unless ($Method::Signatures::mutc{'cache'}{'ABNF::Grammar'} ||= 'Method::Signatures'->_make_constraint('ABNF::Grammar'))->check($_[0])
	0	3	if @_ > 1
71	0	3	if @_ > 0
104	6	9	if ($$value{'value'} != $val)
121	0	288	unless @_ > 0
	279	9	@_ > 1 ? :
	0	288	if @_ > 2
123	24	264	if (UNIVERSAL::isa($val, 'ARRAY')) { }
	264	0	elsif (UNIVERSAL::isa($val, 'HASH') and exists $$CLASS_MAP{$$val{'class'}}) { }
133	0	27	unless @_ > 0
	0	27	unless @_ > 1
	0	27	if @_ > 2
137	0	21	unless @_ > 0
	0	21	unless @_ > 1
	0	21	if @_ > 2
141	0	57	unless @_ > 0
	0	57	unless @_ > 1
	0	57	if @_ > 2
145	0	6	unless @_ > 0
	0	6	unless @_ > 1
	0	6	if @_ > 2
155	6	0	if (my $mm = $maxMin{"$$val{'max'} $$val{'min'}"}) { }
	0	0	elsif ($$val{'min'} == $$val{'max'}) { }
164	0	72	unless @_ > 0
	0	72	unless @_ > 1
	0	72	if @_ > 2
168	0	72	if ('ws' eq lc $name) { }
179	0	181	unless @_ > 0
	0	181	if @_ > 1
184	0	21	unless @_ > 0
	0	21	unless @_ > 1
	0	21	if @_ > 2
205	0	18	unless @_ > 0
	0	18	unless @_ > 1
	0	18	if @_ > 2
226	0	42	unless @_ > 0
	0	42	unless @_ > 1
	0	42	if @_ > 2
230	0	0	unless @_ > 0
	0	0	unless @_ > 1
	0	0	if @_ > 2
248	0	8	unless @_ > 0
	0	8	unless ($Method::Signatures::mutc{'cache'}{'Str'} ||= 'Method::Signatures'->_make_constraint('Str'))->check($_[0])
	0	8	unless @_ > 1
	0	8	unless ($Method::Signatures::mutc{'cache'}{'Str'} ||= 'Method::Signatures'->_make_constraint('Str'))->check($_[1])
	0	8	if @_ > 2
249	1	7	unless exists $$self{'_regexps'}{$rule}
268	0	23	unless @_ > 0
	0	23	unless @_ > 1
	0	23	if @_ > 2
269	1	22	unless exists $$self{'_regexps'}{$rule}
282	0	3	unless @_ > 0
	0	3	if @_ > 1
294	0	0	unless @_ > 0
	0	0	if @_ > 1
308	0	3	if @_ > 0