blib/lib/Sub/Lib.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 20 | 20 | 100.0 |
line | true | false | branch |
---|---|---|---|
13 | 2 | 3 | if (1 == @args) { } |
14 | 1 | 1 | unless 'HASH' eq ref $args[0] |
19 | 1 | 2 | unless 0 == @args % 2 |
30 | 5 | 10 | unless defined $name |
33 | 3 | 7 | if (defined $sub) { } |
34 | 1 | 2 | unless 'CODE' eq ref $sub |
37 | 1 | 1 | if exists $_lib->{$name} |
43 | 1 | 6 | unless exists $_lib->{$name} |
82 | 1 | 1 | exists $_lib->{$name} ? : |
104 | 1 | 1 | unless 'CODE' eq ref $sub |