blib/lib/Params/Lazy.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 12 | 16 | 75.0 |
line | true | false | branch |
---|---|---|---|
30 | 1 | 66 | if (@_ == 1) |
31 | 0 | 1 | if ($_[0] eq 'force') { } |
0 | 1 | elsif ($_[0] eq 'caller_args') { } | |
40 | 1 | 66 | if (@_ and @_ % 2) |
47 | 2 | 77 | if (grep((!defined($_)), $name, $proto)) |
53 | 0 | 77 | if ((ref $name || '') eq 'CODE') { } |
57 | 77 | 0 | unless ($name =~ /::/) |
70 | 52 | 25 | unless (*{$glob;}{'CODE'}) |