Branch Coverage

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


line true false branch
59 2059 4119 if ($entry eq 'pattern')
66 2059 2060 if ($entry eq 'clean')
69 2060 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 103 2060 unless ($saw_import or $no_defaults)
93 0 1339 if $exclude{$module}
95 0 1339 if $@
101 5 6 if ($entry =~ /^RE_(\w+_)?ALL$/) { }
102 3 2 defined $1 ? :
105 0 865 if $exported{$sub}
106 231 634 unless $sub =~ /$re/
115 0 6 if $exported{$entry}
117 0 6 unless $sub_interface{$entry}
141 0 1558657 unless exists $cache->{'__VAL__'}
145 0 1558657 unless ($cache->{'__VAL__'}{'version'} || 0) <= $]
147 775046 3123401 /$fpat/ ? :
54391 3898447 /$fpat\Q$;\E(.*)/ ? :
173 0 12354 unless $spec{'name'} and ref $spec{'name'} eq 'ARRAY'
175 0 12354 unless $spec{'create'}
177 7597 4757 if (ref $spec{'create'} ne 'CODE')
185 8449 25773 if (/$fpat=(.*)/) { }
71 25702 elsif (/$fpat\s*$/) { }
198 0 12354 if ($entry->{'__VAL__'})
215 1 31989 if @_ % 2
219 0 31990 if (exists $flags{-'keep'}) { }
221 32 31958 exists $flags{-'i'} ? :
251 741938 816704 if (exists $self->{'flags'}{-'keep'}) { }
257 32 1558610 if (exists $self->{'flags'}{-'i'})