Branch Coverage

blib/lib/autouse.pm
Criterion Covered Total %
branch 14 24 58.3


line true false branch
18 9 0 @_ ? :
19 0 9 unless @_
24 5 4 if (exists $INC{$pm})
33 0 4 if $DEBUG
38 0 4 if (my $func = $f) =~ s/\((.*)\)$//
43 4 0 if ($index == -1) { }
47 0 0 unless substr($func, 0, $index) eq $module
52 2 1 unless ($INC{$pm})
58 0 2 if $DEBUG
64 0 4 if (defined $proto) { }
75 7 0 if (my $import = $module->can('import'))
76 1 6 unless defined &Exporter::import and $import == \&Exporter::import || $import == \&UNIVERSAL::import