blib/lib/deferred.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 18 | 22 | 81.8 |
line | true | false | branch |
---|---|---|---|
14 | 2 | 2 | ref $_ ? : |
20 | 1 | 1 | @_ && $_[0] eq '-discard' ? : |
22 | 0 | 2 | if (@_) { } |
23 | 0 | 0 | ref $_ ? : |
31 | 1 | 1 | unless ($discard) |
70 | 0 | 4 | if $method eq 'DESTROY' |
72 | 3 | 1 | if exists $half_loaded{$class} |
77 | 1 | 2 | if (*{$load;}{'CODE'}) { } |
1 | 1 | elsif (my $can = $class->can($method)) { } | |
92 | 4 | 44 | unless not ref $_ |
102 | 1 | 3 | unless $ok |