Branch Coverage

blib/lib/Regexp/Parser/Objects.pm
Criterion Covered Total %
branch 66 182 36.2


line true false branch
34 51 11 exists $self->{'vis'} ? :
39 66 0 exists $self->{'raw'} ? :
49 0 11 unless ($self->{'down'})
63 20 83 if @_
71 0 63 if $self->omit
94 0 8 if $class =~ /::anchor$/
145 0 0 if @_
153 0 0 $self->{'neg'} ? :
158 0 0 $self->{'neg'} ? :
180 0 0 if @_
186 0 0 $self->{'neg'} ? :
193 0 0 $self->{'neg'} ? :
215 0 0 if @_
221 0 0 $self->{'neg'} ? :
228 8 8 $self->{'neg'} ? :
263 0 1 $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 0 6 unless defined $vis
365 0 0 if (ref $type) { }
380 0 0 if (ref $self->{'data'}) { }
385 0 0 $self->{'neg'} ? :
391 0 0 if (ref $self->{'data'}) { }
392 0 0 if @_
396 0 0 if @_
403 0 0 if (ref $self->{'data'}) { }
408 0 0 $self->{'neg'} ? :
449 0 1 $neg ? :
465 0 0 if @_
471 0 1 $self->{'neg'} ? :
523 0 0 unless @$tree
525 0 0 unless $tree->[-1] == $self
526 0 0 unless @$tree > 1
528 0 0 unless $prev->type eq $self->type
536 20 0 if ($d)
552 6 6 if (@$st and @{$st->[-1];} and $st->[-1][-1]->type eq 'ifthen') { }
0 6 elsif (@$st and @{$st->[-1];} and $st->[-1][-1]->family eq $self->family) { }
564 0 0 unless $br->{'zerolen'} &&= $_->{'zerolen'}
577 6 0 unless $tree->[-1]{'zerolen'} &&= $_->{'zerolen'}
592 42 1 unless defined $vis
610 3 66 $self->{'flags'} & $self->{'rx'}->FLAG_i ? :
621 0 43 unless @$tree
623 0 43 unless $tree->[-1] == $self
624 14 29 unless @$tree > 1
626 24 5 unless $prev->type eq $self->type
666 5 15 if ($min == 0 and $max eq '') { }
6 9 elsif ($min == 1 and $max eq '') { }
674 35 49 if ($min == 0 and $max eq '') { }
27 22 elsif ($min == 1 and $max eq '') { }
2 20 elsif ($min == 0 and $max == 1) { }
4 16 elsif ($max ne '' and $min == $max) { }
693 0 0 if (@_)
695 0 0 if ($how eq '=') { }
0 0 elsif ($how eq '+') { }
707 11 4 if $d
715 0 17 if @$tree == 0 or $tree->[-1]->family eq 'flags'
719 0 17 if $tree->[-1]->family eq 'quant'
723 0 17 if ($tree->[-1]->family eq 'exact' and @{$tree->[-1]{'data'};} > 1) { }
735 0 17 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 34 elsif ($tree->[-1]{'zerolen'} and $self->{'max'} eq '') { }
787 0 9 length $self->{'off'} ? :
802 0 0 if (@_)
804 0 0 if ($how eq '=') { }
0 0 elsif ($how eq '+') { }
817 1 0 if $d
877 0 0 if (@_)
879 0 0 if ($how eq '=') { }
0 0 elsif ($how eq '+') { }
892 0 0 if $d
939 0 26 unless $tree = pop @{$$rx{'stack'};}
945 7 13 if $self->family eq 'close' and $tree->[-1]->can('nparen')
948 6 14 if ($tree->[-1]{'ifthen'}) { }
953 6 0 if (ref $ifthen->{'data'}[0] eq 'ARRAY') { }
971 0 20 unless $self->omit
1000 0 0 unless $rx->{'tree'} = pop @{$$rx{'stack'};}
1004 0 0 if $self->family eq 'close' and $tree->[-1]->can('nparen')
1007 0 0 if ($tree->[-1]{'ifthen'}) { }
1012 0 0 if (ref $ifthen->{'data'}[0] eq 'ARRAY') { }
1030 0 0 unless $self->omit
1053 0 0 $self->{'flags'} & $self->{'rx'}->FLAG_i ? :
1091 0 0 if (@_)
1093 0 0 if ($how eq '=') { }
0 0 elsif ($how eq '+') { }
1106 10 0 if $d
1145 2 5 $self->{'dir'} < 0 ? :
1176 2 5 $self->{'dir'} < 0 ? :
1381 1 1 length $self->{'off'} ? :
1415 3 1 if $d