Branch Coverage

blib/lib/Import/Base.pm
Criterion Covered Total %
branch 39 42 92.8


line true false branch
25 145 6 unless ($args->{'bundles_only'})
42 3 31 if $args[0] =~ /^-/
76 1 45 if $$args{-'exclude'} and ref $$args{-'exclude'} ne 'ARRAY'
78 2 43 if ($$args{-'exclude'})
81 1 1 ref $$args{-'exclude'}[0] eq 'ARRAY' ? :
96 15 130 if (ref $modules[0] eq 'CODE')
104 4 126 if (ref $thing eq 'HASH') { }
110 45 85 ref $modules[0] eq 'ARRAY' ? :
113 10 120 if ($module =~ /^</) { }
10 110 elsif ($module =~ /^>/) { }
115 0 10 if (defined $version) { }
124 0 10 if (defined $version) { }
141 15 138 if (ref $load eq 'CODE') { }
4 134 elsif (ref $load eq 'HASH') { }
152 136 2 ref $loads[0] eq 'ARRAY' ? :
154 2 136 if (exists $exclude->{$module})
155 1 1 if (defined $exclude->{$module}) { }
159 0 1 unless grep {$_ eq $import;} @{$$exclude{$module};}
169 34 103 if ($module =~ /^-/)
174 2 135 if ($module->isa('Import::Base'))
181 4 131 if (defined $version) { }