Branch Coverage

blib/lib/Regexp/Parser/Objects.pm

Criterion	Covered	Total	%
branch	103	218	47.2

line	true	false	branch
34	174	11	exists $self->{'vis'} ? :
39	187	0	exists $self->{'raw'} ? :
49	0	11	unless ($self->{'down'})
63	20	874	if @_
71	0	707	if $self->omit
94	0	36	if $class =~ /::anchor$/
145	0	0	if @_
153	0	2	$self->{'neg'} ? :
158	4	8	$self->{'neg'} ? :
180	0	0	if @_
186	0	0	$self->{'neg'} ? :
193	4	8	$self->{'neg'} ? :
215	0	0	if @_
221	0	0	$self->{'neg'} ? :
228	12	15	$self->{'neg'} ? :
263	4	34	$self->{'neg'} ? :
268	0	0	if @_
279	0	0	if (@_)
281	0	0	if ($how eq '=') { }
	0	0	elsif ($how eq '+') { }
294	0	0	if $d
313	65	42	unless defined $vis
365	34	14	if (ref $type) { }
380	2	0	if (ref $self->{'data'}) { }
386	0	0	ref $self->{'how'} eq 'SCALAR' ? :
388	0	0	$self->{'neg'} ? :
394	0	0	if (ref $self->{'data'}) { }
395	0	0	if @_
399	0	0	if @_
406	17	7	if (ref $self->{'data'}) { }
412	7	0	ref $self->{'how'} eq 'SCALAR' ? :
414	2	5	$self->{'neg'} ? :
455	2	3	$neg ? :
471	0	0	if @_
477	2	3	$self->{'neg'} ? :
529	0	0	unless @$tree
531	0	0	unless $tree->[-1] == $self
532	0	0	unless @$tree > 1
534	0	0	unless $prev->type eq $self->type
542	20	0	if ($d)
558	18	37	if (@$st and @{$st->[-1];} and $st->[-1][-1]->type eq 'ifthen') { }
	6	31	elsif (@$st and @{$st->[-1];} and $st->[-1][-1]->family eq $self->family) { }
570	6	0	unless $br->{'zerolen'} &&= $_->{'zerolen'}
583	31	0	unless $tree->[-1]{'zerolen'} &&= $_->{'zerolen'}
598	485	28	unless defined $vis
616	55	454	$self->{'flags'} & $self->{'rx'}->FLAG_i ? :
627	0	513	unless @$tree
629	0	513	unless $tree->[-1] == $self
630	234	279	unless @$tree > 1
632	89	190	unless $prev->type eq $self->type
672	7	15	if ($min == 0 and $max eq '') { }
	6	9	elsif ($min == 1 and $max eq '') { }
680	49	105	if ($min == 0 and $max eq '') { }
	67	38	elsif ($min == 1 and $max eq '') { }
	7	31	elsif ($min == 0 and $max == 1) { }
	6	25	elsif ($max ne '' and $min == $max) { }
699	0	0	if (@_)
701	0	0	if ($how eq '=') { }
	0	0	elsif ($how eq '+') { }
713	11	4	if $d
721	2	89	if @$tree == 0 or $tree->[-1]->family eq "flags"
725	0	89	if $tree->[-1]->family eq "quant"
729	0	89	if ($tree->[-1]->family eq 'exact' and @{$tree->[-1]{'data'};} > 1) { }
741	0	89	if ($tree->[-1]->family eq 'assertion' and $tree->[-1]->type eq 'eval' or $tree->[-1]{'zerolen'} and not $self->{'min'} == 0 && $self->{'max'} == 1) { }
	0	178	elsif ($tree->[-1]{'zerolen'} and $self->{'max'} eq '') { }
792	4	50	if ($self->{'on'} =~ /^\^/)
796	6	44	length $self->{'off'} ? :
811	0	0	if (@_)
813	0	0	if ($how eq '=') { }
	0	0	elsif ($how eq '+') { }
826	1	0	if $d
886	0	0	if (@_)
888	0	0	if ($how eq '=') { }
	0	0	elsif ($how eq '+') { }
901	0	0	if $d
948	0	192	unless $tree = pop @{$$rx{"stack"};}
954	69	98	if $self->family eq "close" and $tree->[-1]->can("nparen")
957	18	149	if ($tree->[-1]{'ifthen'}) { }
962	18	0	if (ref $ifthen->{'data'}[0] eq 'ARRAY') { }
980	0	167	unless $self->omit
1009	0	0	unless $rx->{'tree'} = pop @{$$rx{"stack"};}
1013	0	0	if $self->family eq "close" and $tree->[-1]->can("nparen")
1016	0	0	if ($tree->[-1]{'ifthen'}) { }
1021	0	0	if (ref $ifthen->{'data'}[0] eq 'ARRAY') { }
1039	0	0	unless $self->omit
1053	16	0	$vis ? :
1063	0	0	$self->{'flags'} & $self->{'rx'}->FLAG_i ? :
1073	13	0	exists $self->{'vis'} ? :
1142	0	0	if (@_)
1144	0	0	if ($how eq '=') { }
	0	0	elsif ($how eq '+') { }
1157	10	0	if $d
1196	7	11	$self->{'dir'} < 0 ? :
1227	7	11	$self->{'dir'} < 0 ? :
1431	2	8	if ($self->{'on'} =~ /^\^/)
1435	3	5	length $self->{'off'} ? :
1469	3	1	if $d
1517	0	2	if @_
1523	1	1	$self->{'neg'} ? :
1530	2	4	$self->{'neg'} ? :
1552	0	2	if @_
1558	1	1	$self->{'neg'} ? :
1565	1	2	$self->{'neg'} ? :
1642	0	0	if (@_)
1644	0	0	if ($how eq '=') { }
	0	0	elsif ($how eq '+') { }
1657	0	0	if $d
1689	0	0	$self->{'flags'} & $self->{'rx'}->FLAG_i ? :
1734	0	0	if $d