Branch Coverage

blib/lib/Regexp/Common.pm
Criterion Covered Total %
branch 42 64 65.6


line true false branch
59 2089 4177 if ($entry eq 'pattern')
66 2088 2089 if ($entry eq 'clean')
69 2089 0 if ($entry eq 'no_defaults')
73 0 0 if (my $module = $imports{$entry})
76 0 0 if $@
79 0 0 if ($entry =~ /^!(.*)/ and $imports{$1})
84 0 0 $entry =~ /^Regexp::Common/ ? :
88 0 0 if $@
91 105 2089 unless ($saw_import or $no_defaults)
93 0 1365 if $exclude{$module}
95 0 1365 if $@
101 6 6 if ($entry =~ /^RE_(\w+_)?ALL$/) { }
102 4 2 defined $1 ? :
105 0 1038 if $exported{$sub}
106 308 730 unless $sub =~ /$re/
115 0 6 if $exported{$entry}
117 0 6 unless $sub_interface{$entry}
141 0 1564278 unless exists $cache->{'__VAL__'}
145 0 1564278 unless ($cache->{'__VAL__'}{'version'} || 0) <= $]
147 775808 3134643 /$fpat/ ? :
54391 3910451 /$fpat\Q$;\E(.*)/ ? :
173 0 12530 unless $spec{'name'} and ref $spec{'name'} eq 'ARRAY'
175 0 12530 unless $spec{'create'}
177 7704 4826 if (ref $spec{'create'} ne 'CODE')
185 8568 26140 if (/$fpat=(.*)/) { }
72 26068 elsif (/$fpat\s*$/) { }
198 0 12530 if ($entry->{'__VAL__'})
215 1 35554 if @_ % 2
219 0 35555 if (exists $flags{-'keep'}) { }
221 32 35523 exists $flags{-'i'} ? :
251 742319 821944 if (exists $self->{'flags'}{-'keep'}) { }
257 32 1564231 if (exists $self->{'flags'}{-'i'})