| blib/lib/Autoload/AUTOCAN.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 17 | 22 | 77.2 |
| line | true | false | branch |
|---|---|---|---|
| 71 | 0 | 2 | if ($arg eq 'methods') { } |
| 1 | 1 | elsif ($arg eq 'functions') { } | |
| 1 | 0 | elsif ($arg eq 'install_subs') { } | |
| 90 | 0 | 4 | unless (eval "package $target;\n$can_code\n$autoload_code\n1") |
| 2 | 8 | defined $autocan ? : | |
| 3 | 7 | unless defined $sub and do { local $@; eval { do { $sub = \&$sub; 1 } } } | |
| 24 | 7 | if defined $sub | |
| 2 | 11 | if $function eq 'AUTOCAN' | |
| 7 | 0 | defined $autocan ? : | |
| 4 | 3 | unless defined $sub and do { local $@; eval { do { $sub = \&$sub; 1 } } } | |
| 96 | 0 | 4 | if $errored |