Branch Coverage

blib/lib/as.pm
Criterion Covered Total %
branch 20 26 76.9


line true false branch
34 1 0 if $@ =~ /CORE::GLOBAL::require/
42 0 180 if ($old) { }
10 170 elsif ($file =~ /^v?[\d\.]+$/) { }
142 28 elsif ($INC{$file}) { }
62 3 177 if ($@)
69 13 164 unless $module =~ s/\.pm$//
73 164 0 if (my $import = $module->can('import')) { }
79 4 1138 if (@_ >= 3 and $_[-2] eq "as")
85 1140 0 if @_
122 3 1 if (%{$alias . '::';})
125 2 1 if (my $old = $ALIASED{$alias}) { }
126 1 1 if $old ne $module
158 0 0 if @_ < 3 or $_[-2] ne "as"