Branch Coverage

blib/lib/Exporter/Heavy.pm
Criterion Covered Total %
branch 0 80 0.0


line true false branch
33 0 0 if (@$ok)
49 0 0 if ($text =~ s/ at \S*Exporter\S*.pm line \d+.*\n//) { }
61 0 0 if $_[0] =~ /^Unable to create sub named "(.*?)::"/
70 0 0 if (@imports) { }
71 0 0 unless (%$export_cache)
76 0 0 if (grep m[^[/!:]], @imports)
82 0 0 if $imports[0] =~ /^!/
86 0 0 if ($spec =~ s/^://) { }
0 0 elsif ($spec =~ m[^/(.*)/$]) { }
87 0 0 if ($spec eq 'DEFAULT') { }
0 0 elsif ($tagdata = $tagsref->{$spec}) { }
101 0 0 unless @allexports
108 0 0 $remove ? :
0 0 if $Exporter::Verbose
111 0 0 if ($remove) { }
123 0 0 unless ($export_cache->{$sym})
124 0 0 if ($sym =~ /^\d/) { }
0 0 elsif (not $sym =~ s/^&// && $export_cache->{$sym}) { }
128 0 0 if (@imports == 1)
134 0 0 if (@imports == 2 and not $imports[1])
142 0 0 unless ($cache_is_current)
148 0 0 unless ($export_cache->{$sym})
157 0 0 if ($oops)
169 0 0 if (@$fail)
170 0 0 unless (%$fail_cache)
174 0 0 /^\w/ ? :
175 0 0 if $Exporter::Verbose
179 0 0 if $fail_cache->{$sym}
180 0 0 if (@failed)
187 0 0 if (@failed)
194 0 0 if $Exporter::Verbose
199 0 0 unless $sym =~ s/^(\W)//
209 0 0 $type eq '*' ? :
0 0 $type eq '%' ? :
0 0 $type eq '@' ? :
0 0 $type eq '$' ? :
0 0 $type eq '&' ? :
229 0 0 $export_tags->{$_} ? :
0 0 @$syms ? :
232 0 0 if (@nontag and $^W)