| blib/lib/Module/Build/Functions/DSL.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 13 | 22 | 59.0 |
| line | true | false | branch |
|---|---|---|---|
| 17 | 0 | 0 | unless open *0 |
| 35 | 0 | 0 | if (ref $code eq 'CODE') { } |
| 40 | 0 | 0 | if $@ |
| 50 | 0 | 0 | if $@ |
| 92 | 6 | 9 | if ($token =~ /^(\'|\")/) |
| 95 | 2 | 4 | unless ($token =~ /(\'|\")$/) |
| 99 | 4 | 0 | if $next_token |
| 105 | 1 | 14 | if ($token eq 'if' or $token eq 'unless') { } |
| 114 | 8 | 6 | unless $token_quoted |
| 115 | 6 | 8 | $token_quoted ? : |
| 121 | 10 | 1 | @params ? : |