Branch Coverage

blib/lib/Regexp/Parser/Objects.pm

Criterion	Covered	Total	%
branch	107	230	46.5

line	true	false	branch
34	221	11	exists $self->{'vis'} ? :
39	216	0	exists $self->{'raw'} ? :
49	0	11	unless ($self->{'down'})
63	20	1304	if @_
71	0	1071	if $self->omit
94	0	67	if $class =~ /::anchor$/
98	27	40	$boundary_type ? :
151	0	0	if @_
159	0	2	$self->{'neg'} ? :
164	4	10	$self->{'neg'} ? :
186	0	0	if @_
192	0	0	$self->{'neg'} ? :
199	4	8	$self->{'neg'} ? :
221	0	0	if @_
227	0	0	$self->{'neg'} ? :
234	12	18	$self->{'neg'} ? :
269	4	38	$self->{'neg'} ? :
274	0	0	if @_
285	0	0	if (@_)
287	0	0	if ($how eq '=') { }
	0	0	elsif ($how eq '+') { }
300	0	0	if $d
319	65	64	unless defined $vis
371	34	14	if (ref $type) { }
386	2	0	if (ref $self->{'data'}) { }
392	0	0	ref $self->{'how'} eq 'SCALAR' ? :
394	0	0	$self->{'neg'} ? :
400	0	0	if (ref $self->{'data'}) { }
401	0	0	if @_
405	0	0	if @_
412	17	7	if (ref $self->{'data'}) { }
418	7	0	ref $self->{'how'} eq 'SCALAR' ? :
420	2	5	$self->{'neg'} ? :
461	2	3	$neg ? :
477	0	0	if @_
483	2	3	$self->{'neg'} ? :
535	0	0	unless @$tree
537	0	0	unless $tree->[-1] == $self
538	0	0	unless @$tree > 1
540	0	0	unless $prev->type eq $self->type
548	20	0	if ($d)
564	18	47	if (@$st and @{$st->[-1];} and $st->[-1][-1]->type eq 'ifthen') { }
	8	39	elsif (@$st and @{$st->[-1];} and $st->[-1][-1]->family eq $self->family) { }
576	8	0	unless $br->{'zerolen'} &&= $_->{'zerolen'}
589	39	0	unless $tree->[-1]{'zerolen'} &&= $_->{'zerolen'}
604	647	140	unless defined $vis
622	61	775	$self->{'flags'} & $self->{'rx'}->FLAG_i ? :
633	0	787	unless @$tree
635	0	787	unless $tree->[-1] == $self
636	336	451	unless @$tree > 1
638	106	345	unless $prev->type eq $self->type
678	7	16	if ($min == 0 and $max eq '') { }
	6	10	elsif ($min == 1 and $max eq '') { }
686	49	114	if ($min == 0 and $max eq '') { }
	74	40	elsif ($min == 1 and $max eq '') { }
	9	31	elsif ($min == 0 and $max == 1) { }
	6	25	elsif ($max ne '' and $min == $max) { }
705	0	0	if (@_)
707	0	0	if ($how eq '=') { }
	0	0	elsif ($how eq '+') { }
719	11	4	if $d
727	2	98	if @$tree == 0 or $tree->[-1]->family eq "flags"
731	0	98	if $tree->[-1]->family eq "quant"
735	0	98	if ($tree->[-1]->family eq 'exact' and @{$tree->[-1]{'data'};} > 1) { }
747	0	98	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	196	elsif ($tree->[-1]{'zerolen'} and $self->{'max'} eq '') { }
798	4	59	if ($self->{'on'} =~ /^\^/)
802	6	53	length $self->{'off'} ? :
817	0	0	if (@_)
819	0	0	if ($how eq '=') { }
	0	0	elsif ($how eq '+') { }
832	1	0	if $d
892	0	0	if (@_)
894	0	0	if ($how eq '=') { }
	0	0	elsif ($how eq '+') { }
907	0	0	if $d
954	0	263	unless $tree = pop @{$$rx{"stack"};}
960	102	131	if $self->family eq "close" and $tree->[-1]->can("nparen")
963	18	215	if ($tree->[-1]{'ifthen'}) { }
968	18	0	if (ref $ifthen->{'data'}[0] eq 'ARRAY') { }
986	0	233	unless $self->omit
1015	0	0	unless $rx->{'tree'} = pop @{$$rx{"stack"};}
1019	0	0	if $self->family eq "close" and $tree->[-1]->can("nparen")
1022	0	0	if ($tree->[-1]{'ifthen'}) { }
1027	0	0	if (ref $ifthen->{'data'}[0] eq 'ARRAY') { }
1045	0	0	unless $self->omit
1059	16	0	$vis ? :
1069	0	0	$self->{'flags'} & $self->{'rx'}->FLAG_i ? :
1079	13	0	exists $self->{'vis'} ? :
1150	0	0	if (@_)
1152	0	0	if ($how eq '=') { }
	0	0	elsif ($how eq '+') { }
1165	10	0	if $d
1204	9	15	$self->{'dir'} < 0 ? :
1235	11	13	$self->{'dir'} < 0 ? :
1439	2	9	if ($self->{'on'} =~ /^\^/)
1443	3	6	length $self->{'off'} ? :
1477	3	1	if $d
1525	0	2	if @_
1531	1	1	$self->{'neg'} ? :
1538	2	4	$self->{'neg'} ? :
1560	0	2	if @_
1566	1	1	$self->{'neg'} ? :
1573	1	2	$self->{'neg'} ? :
1650	0	0	if (@_)
1652	0	0	if ($how eq '=') { }
	0	0	elsif ($how eq '+') { }
1665	0	0	if $d
1697	0	0	$self->{'flags'} & $self->{'rx'}->FLAG_i ? :
1742	0	0	if $d
1854	4	9	if defined $self->{'arg'} and length $self->{'arg'}
1895	0	0	if (@_)
1897	0	0	if ($how eq '=') { }
	0	0	elsif ($how eq '+') { }
1910	0	0	if $d